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Eliminates Every Bug known to Compilers 


_ As well as a few other species 


H.E.L.P. is a completely interactive 
C programming environment with three 
innovative full-sized features that will 
revolutionize the way you write code. 


A Clean Compile — 
Guaranteed! 


ay Good-bye to all compiler-type 

errors. H.E.L.P. ’s built-in program 
checker (which would embarrass LINT) 
not only hunts down bugs . . . explains 
the proper syntax... gives examples of 
usage ... but will even offer suggested 
corrections. If you want, H.E.L.P. will 
even make the corrections for you... 
at the touch of a key. 


H.E.L.P. also finds semantic errors as 
well as poor style and inefficiencies. 
You can even check the portability of 
your code! 


Multi-Window Editing 


pen as many windows as you want 
. there’s no limitation ...not even 
your own memory. Because H.E.L.P. 
uses a virtual memory system you can 
create programs larger than your 
machine capacity. 


H.E.L.P.’s very powerful editor allows 
you the flexibility to work in several 
windows . . . with several files at the 
same time. 


Save Keystrokes 


H undreds of commands are bound 
to the keyboard to give you fast 
execution. 


Always be in Control 


ot only can you develop code in 

many windows at the same time, but 
you can show (and refer to) important 
definitions in one window while creating 
in another. Or open a window and keep 
notes about your program...ortypea 
memo... ora letter. 


Increase your Productivity 
by 300% or More..... 


La are a novice programmer, you'll 
begin writing code like an advanced 
programmer much faster with H.E.L.P. 


J ust imagine what H.E.L.P. will do 
for the ADVANCED PROGRAMMER. 


ou’ll have more time to become 
creative with your algorithm (since 
H.E.L.P. will make sure your code 
compiles the ‘first time at bat”). 


H.E.L.P. tracks every step you make. 
lf you are not sure about a command, 
just press a key, and you'll get the kind 
of help you need. 

Circle no. 30 on reader service card. 





Check These Features 


@ Multi-window environ- @ Intelligent help sub- 


ment system 
@ Interactive program @ User-definable key- 
checking 


board bindings 

@ Supports color and 
monochrome 

@ H.E.L.P. supports the 
full C Language 


@ Check syntax, semantic, 
type usage, intermodule 
inconsistencies and 
portability 

@ Multi-file editing 


NOW IN MS-DOS 





Everest Solutions, Inc. 
3350 Scott Boulevard 
Building 58 

Santa Clara, CA95051 
(408) 986-8977 
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Phoenix makes programmers dreams come truce. With the best- 
engineered, highest performance programming tools you can 
find. A full line of MS-DOS®/PC DOS programs and utilities 
no other company offers. All designed to help you write, test 
and deliver the best programs possible. Top-of-the-line quality 
at a price you can afford. And all these products are available 
for the IBM® PC, XT,™ AT ™ and compatibles. 


Finally, A Lint For MS-DOS. 


Now you can get the full range of 
features C programmers working in 
UNIX™ have come to expect from their 
Lint program analyzer. 

With Pre-C™ you can detect structural 
errors in C programs five times faster 
than you can with a debugger. Find 

usage errors almost impossible to detect 
with a compiler. Cross-check multiple source files and parame- 
ters passed to functions. Uncover interface bugs that are difficult 
to isolate. All in a single pass. Capabilities no C compiler, with 
or without program analyzing utilities, can offer. In fact, Pre-C 
outlints Lint, since you can handle analyses incrementally. 

Pre-C’s flexible library approach lets you maintain continuity 
across all the programs in your shop, whether you use Pre-C’s 
pre-built libraries, pre-existing functions you already have, or 
some you might want to buy yourself. 

Plus. you’re not limited to one particular library, and Pre-C 
keeps track of all the libraries you re using to make sure that 
code calls them correctly. $395. 


ys 
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Outside the US, contact: Lifeboat Japan, Tokyo, Japan, Telex 
#2423296 LBJT YO, Telephone: 03-456-4101 * Repro Haganum 
(Stevis BV), Dinther, Netherlands, Telex #39581 REHAGNL, 
Telephone: 01-720-74543, 01-720-75543 » Memory Data, Sundbyberg, 
Sweden, Telephone: 46-8764-6700 * Roundhill Computer Systems, 
Marlborough, Wiltshire, UK, Telex #444453 AWARE G, Telephone: 
44-467254675. 






Assemble Programs Twice As Fast. 


Pasm'™86 will assemble MASM files 
two to three times faster than MASM 
3.0. Pasm86 supports 8086/88, 8087. 
80186 and 80286 processors. 

With Pasm86’s built-in defaults, you 
can write code quickly since you wont 
spend hours learning all the control 
statements needed at the beginning of your program. You can 
define symbols on the command line. Decide whether you want 


error messages or not. And, put local symbols within proce- 
dures. $295. 


Still Fixing Bugs The Hard Way? 


Pfix'™86 Plus, the most advanced 
symbolic debugger on the market, elimi- 
nates the endless error searches through 
piles of listings. Locate instructions and 
data by symbolic name, using symbolic 
addresses. Handle larger, overlayed 

programs with ease. 
An adjustable multiple-window display shows source, object 
code and data, breakpoint settings, current machine register 
and stack contents simultaneously. An in-line assembler allows 
program corrections directly in Assembly language. Powerful 
breakpoint features run a program full speed until a loop has 
been performed n times. 

With a single keystroke you can trace an instruction and the 
action will be immediately reflected in source, object, data, 
stack, and register windows. Another key begins a special trace 
mode that executes call and loop instructions at full speed. 
Designed to work with both Plink™86 and MS® LINK linkage 
editors. $395. 


Programmer's Pfantasies_ Pre-C and Pfinish are trademarks of Phoenix Computer 
Products Corporation 

MS-DOS and MS are registered trademarks of Microsoft Corporation. 

IBM ts a registered trademark of International Business Machines Corporation. 


Get The Lead Out 
Of Binary File Transfer. 


Ptel™ is the universal binary file 
transfer program for MS-DOS 2.0 or 
higher. You can move binary files fast 
and accurately. Upload or download 
groups of files from Bulletin Boards 
or remote computers. Move files 
between dissimilar machines and 
operating systems. Ptel’s advanced binary protocol, Telink'™ 
offers better-than- Modem? accuracy and performance. Faster 
transfer speeds. An on-screen update of error correction. 
blocks transferred, and transmission time. 

Includes popular Modem7 and X Modem protocols. With 
checksum or CRC. Plus Kermit and ASCII. $195. 


Maximize Your Program’s Efficiency. 


Pfinish™ delivers the fastest running 
programs possible. This performance 
analyzer lets you ‘‘zoom in”’ on the inef- 
ficient parts of your program. Whether 
written in Assembly language. C. 
PASCAL. FORTRAN. BASIC. Unlike 
profilers available today, Pfinish under- 
stands the structure of your program and reports the amount of 
activity and time spent in its subroutines or functional groups. 
Pfinish analyzes both overlaid and memory resident programs. 
Down to the instruction level. Reports are displayed. Stored on 
disk. Or printed out. In tabular form or histograms. 

Do a dynamic program scan. Identify the most frequently 
executed subroutines. Find inefficient code that costs your pro- 


gram valuable time. Rank subroutines by execution frequency. 
$395. 





XT and AT are trademarks of International Business Machines Corporation 

UNIX 3 a trademark of ATA T Bell | aboratonc<, 

Pasm&6_ Pfixk6 Plus. Picl. Telink. Pmate and Plink86 are trademarks of Phocnix Software 
Associates Lid: 
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Why Work With A Primitive Editor? 


More than a powerful editor, Pmate™ 
is a text processing language. An emula- 
tor of other editors. A language-specific 
editor for C, PASCAL, and FORTRAN. 
Pmate can even run in the background! 

You get full-screen, single-key edit- 
ing. Ten editing buffers. Horizontal and 
vertical scrolling. A “‘garbage stack’’ buffer. A built-in macro 
language with variables, control statements, radix conversion, 
tracing and 120 commands that you can group and execute with 
a single keystroke. $225. 


Why Squeeze Your Program 
More Than You Have To? 


The Plink86 overlay linkage editor 
brings modular programming to 8086/ 
88-based micros. Write large and com- 
plex programs without worrying about 
memory constraints. Work on modules 

— individually, link them into executable 
files. Use the same module in different programs. Change the 
overlay structure of an existing program without recompiling. 
Use one overlay to access code and data in other overlays. 

Plink86 links Intel-format modules. $395. 


Call (800) 344-7200. In Massachusetts (617) 762-5030. Or, write. 
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Editorial Calendar 


The editorial calendar for the first three months of 1986 has been set. In 
January we will focus on programming for the 68000, in February we will 
present a sampling from the structured languages Pascal, Ada, and Mo- 
dula 2, and finally in March we will look ahead to what computing will be 
like in the future, with particular concentration on parallel processing. 
Article submissions and new product announcements should be in our 
hands no later than three months in advance of any issue. 


Late Breaking News 


In “16-Bit Software Toolbox” in June and again this month Ray Duncan 
mentioned patches distributed by MicroPro Technical Support that allow 
WordS*tar to use the HP LaserJet’s boldface, italics and various fonts. As 
this issue was going to press Ray received a letter from MicroPro stating 
that the LaserJet patches were intended as a temporary fix and are no 
longer available. Updated printer enhancement disks that include LaserJet 
support have been sent to all MicroPro dealers. 


Corrigendum 


In last month’s review of C Compilers we accidentally left out the address 
and telephone number of Rational Systems, manufacturer of Instant C, an 
interpreter for the C programming language. We apologize to the folks at 
Rational for this omission and include their address and phone number 
below for the information of our readers: 


Rational Systems, Inc. 
P.O. Box 480 
Natick, MA 01760 
(617) 653-6194 
This Month’s Referees 


Dennis Allison, Stanford University 
Allen Holub, DDJ Contributing Editor 
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signers, I heard George Morrow express the computer vendor’s dilem- 

ma: supplying solutions without knowing the problems. There is, Mor- 
row explained, a very high wall. Computer hardware manufacturers dwell on 
one side, and in the dense jungle on the other side prowl strange questing 
beasts called customers. The manufacturers blindly, randomly throw ma- 
chines over this wall. Occasionally one of them is rewarded with the sound of 
feeding somewhere beyond the wall, and they all rush to throw their machines 
at this latest feeding spot. : 

Publishing a magazine for advanced programmers is not quite such a ran- 
dom process: there are various means by which we can know our customers. 
We read what you write on the postage-paid response cards included in every 
issue. We do regular reader surveys, because interests can change quickly in so 
volatile a field as computer programming. And we have begun a spot survey 
that will give us quick information about our readers’ interests. 

Listening to your feedback has helped us in shaping an editorial calendar 
for 1986. On your advice, we will be looking more closely at advanced proces- 
sors in 1986, while not abandoning machines of the 8080/6502 class. We 
asked for feedback on our hardware issue in July, and although you were not 
univocal, we think we got the message. We will consequently not run a hard- 
ware issue next year, but will run hardware articles whenever they seem ap- 
propriate and good. 

The trick is to satisfy the diverse interests simultaneously. As this issue 
exemplifies, we are focusing more on algorithms, and in other ways attempt- 
ing to present tools that are as portable, as broadly useful as possible. But to 
follow that path to the end would mean never publishing any assembly code, 
and that would cut out some of the best pieces that come into the office. 

So we’ll continue the juggling act. We'll publish articles focusing on partic- 
ular topics, presenting specialized programming tools, sometimes with code 
written in assembly language when that’s the best medium for it, but always 
with tips on ways to port these tools to other environments. We'll maintain an 
emphasis on the underlying algorithms. And we'll try to maintain balance in 
the magazine, making sure that we’re supplying something for everyone. 

But we are still interested in good assembly language programming; in fact, 
our first issue of 1986 will focus on programming for the Motorola 68000 
processors. It’s not too late to send us your 68K code, but don’t wait: the 
deadline for submissions is October 1. 

Of course, some 68000 machines try to pass as 8088s, like the Amiga, the 
Mac-killer that Commodore has thrown over the wall into the IBM area, just 
south of a mob of hostile dealers. My friend Norm down at the Fab Lab has 
been researching that commonly observed phenomenon of two people achiev- 
ing the same breakthrough at the same time. Norm’s preliminary findings 
indicate that this may be part of some larger resonance in technological deci- 
sion making. For example, just as IBM dropped the 54-inch floppy disk, 
Commodore picked up that medium as the means of getting software onto the 
Amiga quickly—IBM PC software, that is. Commodore hopes people will use 
the Amiga as an IBM PC with good games until the native-mode and/or 
graphics interface-based software arrives. If the software doesn’t arrive—ah, 
is that why they didn’t put the company name on the machine? 


“trela) St 


Michael Swaine 


A t Micro Cornucopia’s recent Semi-Official Gathering of hardware de- 
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Manx Aztec C86 
“A compiler that has many strengths ... quite valuable 
for serious work” 

Computer Language review, February 1985 
Great Code: Manx Aztec C86 generates fast executing 
compact code. The benchmark results below are from a 
study conducted by Manx. The Dhrystone benchmark 
(CACM 10/84 27:10 pl018) measures performance for a 
out register variables. With register variables, Manx, 
Microsoft, and Mark Williams run proportionately faster, 
Lattice and Computer Innovations show no improve- 
ment. 





Great Features: Manx Aztec C86 is bundled with a powerful 
array of well documented productivity tools, library routines 


and features. 

Optimized C compiler Symbolic Debugger 

AS86 Macro Assembler LN86 Overlay Linker 
80186/80286 Support Librarian 

8087/80287 Sensing Lib Profiler 

Extensive UNIX Library DOS, Screen, & Graphics Lib 
Large Memory Model Intel Object Option 

Z (vi) Source Editor -c CP/M-86 Library -c 

ROM Support Package-c INTEL HEX Utility < 
Library Source Code -c Mixed memory models -c 


MAKE, DIFF, and GREP -c Source Debugger -c 
CP/M-86 Library -c 


Manx offers two commercial development systems, 
Aztec C86-c and Aztec C86-d. Items marked -c are 
special features of the Aztec C86-c system. 


Aztec C86-c Commercial System $499 
Aztec C86-d Developer’s System $299 
Aztec C86-p Personal System $199 
Aztec C86-a Apprentice System $49 


All systems are upgradable by paying the difference 
in price plus $10. 

Third Party Software: There are a number of high qual- 
ity support packages for Manx Aztec C86 for screen 
management, graphics, database management, and soft- 


ware development. 

C-tree $395 Greenleaf $185 
PHACT $250 PC-lint $98 

HALO $250 Amber Windows $59 
PRE-C $395 Windows for C $195 
WindScreen $149 FirsTime $295 
SunScreen $99 _ = C Util Lib $185 
PANEL $295 Plink-86 $395 


Manx Aztec C68k 

“Library handling is very flexible ... documentation is 
excellent ... the shell a pleasure to work in ... blows 
away the competition for pure compile speed . .. an ex- 


cellent effort.” 

Computer Language review, April 1985 
Aztec C68k is the most widely used commercial C com- 
piler for the Macintosh. Its quality, performance, and 
completeness place Manx Aztec C68k in a position be- 
yond comparison. It is available in several upgradable 
versions. 


Optimized C Creates Clickable Applications 
Macro Assembler Mouse Enhanced SHELL 
Overlay Linker Easy Access to Mac Toolbox 
Resource Compiler UNIX Library Functions 
Debuggers Terminal Emulator (Source) 
Librarian Clear Detailed Documentation 
Source Editor C-Stuff Library 

MacRam Disk -c UniTools (vi, make diff, grep) -c 
Library Source -c One Year of Updates -c 


Items marked -c are available only in the Manx Aztec 
C86-c system. Other features are in both the Aztec C86-d 
and Aztec C86-c systems. 


Aztec C68k-c Commercial System $499 
Aztec C68d-d Developer’s System $299 
Aztec C68k-p Personal System $199 
C-tree database (source) $399 


AMIGA, CP/M-68k, 68k UNIX call 


Manx Aztec C65 


“The AZTEC C system is one of the finest software 
packages I have seen” 
NIBBLE review, July 1984 


A vast amount of business, consumer, and educational 
software is implemented in Manx Aztec C65. The quality 
and comprehensiveness of this system is competitive 
with 16 bit C systems. The system includes a full optim- 
ized C compiler, 6502 assembler, linkage editor, UNIX 
library, screen and graphics libraries, shell, and much 
more. The Apple II version runs under DOS 3.3, and 
ProDOS, Cross versions are available. 

The Aztec C65-c/128 Commodore system runs under 
the C128 CP/M environment and generates programs for 
the C64, C128, and CP/M environments. Call for prices 
and availability of Apprentice, Personal and Developer 
versions for the Commodore 64 and 128 machines. 


Aztec C65-c ProDOS & DOS 3.3 $399 
Aztec C65-d Apple DOS 3.3 $199 
Aztec C65-p Apple Personal system $99 
Aztec C65-a for learning C $49 


Aztec C65-c/128 C64, C128, CPIM $399 





Distribution of Manx Aztec C 


In the USA, Manx Software Systems is the sole and ex- 
clusive distributor of Aztec C. Any telephone or mail 


order sales other than through Manx are unauthorized. 3 


XENIX, ROM, and Cross Development systems 


Cross developed programs are edited, compiled, assem- 
bled, and linked on one machine (the HOST) and trans- 
ferred to another machine (the TARGET) for execution. 
This method is useful where the target machine is slower 
or more limited than the HOST, Manx cross compilers 
are used heavily to develop software for business, 
consumer, scientific, industrial, research, and education- 
al applications. 


HOSTS: VAX UNIX ($3000), PDP-11 UNIX ($2000), MS- 
DOS ($750), CP/M ($750), MACINTOSH ($750), 
CP/M-68k ($750), XENIX ($750). 


TARGETS: MS-DOS, CP/M-86, Macintosh, CP/M-68k, 
CP/M-80, TRS-80 3 & 4, Apple II, Commodore C64, 
8086/80x86 ROM, 68xxx ROM, 8080/8085/Z80 ROM, 
65xx ROM. 

The first TARGET is included in the price of the HOST 
system. Additional TARGETS are $300 to $500 (non 
VAX) or $1000 (VAX). 

Call Manx for information on cross development to the 
68000, 65816, Amiga, C128, CP/M-68K, VRTX, and 
others. 


Manx Aztec Ci 


‘Tve had a lot of experience with different C compilers, 
but the Aztec C80 Compiler and Professional Develop- 


ment System is the best I've seen.” 

80-Micro, December, 1984, John B. Harrell Il 
Aztec C Il-c (CP/M & ROM) $349 
Aztec C Il-d (CP/M) $199 
C-tree database (source) $399 
Aztec C80-c (TRS-80 3 & 4) $299 
Aztec C80-d (TRS-80 3 & 4) $199 
How To Become an Aztec C User 


To become an Aztec C user call 1-800-221-0440 or call 
1-800-832-9273 (800-TEC WARE). In NJ or outside the 
USA call 201-530-7997. Orders can also be telexed to 
4995812. 

Payment can be by check, COD, American Express, 
VISA, Master Card, or Net 30 to qualified customers. 

Orders can also be mailed to Manx Software Systems, 
Box 55, Shrewsbury, NJ 07701. 


How To Get More Information 

To get more information on Manx Aztec C and related 
products, call 1-800-221-0440, or 201-530-7997, or write 
to Manx Software Systems. 


30 Day Guarantee 

Any Manx Aztec C development system can be return- 
ed within 30 days.for a refund if it fails to meet your 
needs. The only restrictions are that the original pur- 
chase must be directly from Manx, shipped within the 
USA, and the package must be in resalable condition. 
Returned items must be received by Manx within 30 
days. A small restocking fee may be required. 
Discounts 

There are special discounts available to professors, 
students, and consultants. A discount is also available on 
a “trade in” basis for users of competing systems. Call for 
in formation: F . 
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LETTERS 


Hardware vs. Software 
Dear DDJ, 

I just received the July issue of Dr. 
Dobbs. In answer to the question you 
pose in your editorial: No, do not in- 
clude hardware articles. Other maga- 
zines, such as Byte, do a fine job of 
covering hardware. Few magazines 
do such a fine job of covering 
software. 

If you expand your scope to in- 
clude hardware, you will dilute your 
focus, and certainly reduce your val- 
ue to me. 

Guy Scharf 
2163 Jardin Drive 
Mountain View, CA 94040 


Dear DDJ, 
In answer to your editorial query 
about hardware articles, I’m in favor 
of having semi-annual hardware is- 
sues, with monographs and project 
papers available from you (at a nomi- 
nal fee, of course). There are many of 
us that can’t afford the big bucks for 
some of the hardware items, but have 
the skills to build them if the instruc- 
tions are adequate. 

Vladimir Ushakoff 

4753 Preston-Fall City Rd., 

SE 

Fall City, WA 98024-5705 


Dear DDJ, 

I have thoroughly enjoyed the hard- 
ware articles in recent issues and 
would like to see more of them. I had 
begun to think no one cared about the 
hardware hacker anymore. I can see 
your point, though, that Dr. Dobb's 
may not be the appropriate vehicle 
for such articles since it really is a 
software journal. 

Why not start a separate journal, a 
hardware companion to DDJ? It could 
contain reviews of new chips with ap- 
plication examples and surveys of dif- 


ferent classes of chips (display or disk 
controllers, for example) as well as 
construction articles. From the re- 
sponse you report to the recent hard- 
ware articles, I think you can see the 
enthusiasm there might be for such a 
project. 

Try one issue dedicated entirely to 
hardware and see how it is received. 
You already have the best software 
journal. Why not have the best hard- 
ware one too? 

David Nye 
209 W. Lowe’s Creek Rd. 
Eau Claire, WI 54701 


Dear DDJ, 
This is in answer to Michael Swaine’s 
question about coverage of hardware 
in Dr. Dobb’s Journal. \t seems to me 
that there is only one way to reply: 
there are already plenty of articles on 
hardware tinkering in other journals, 
and it is out of character for DDJ to 
use its limited space for such articles. 
An occasional, exceptional article is 
just tolerable. Reviews of innovative 
hardware, such as have appeared in 
DDJ through all its years of publica- 
tion, are helpful, as even the ads are. 
Anything more than such as these is 
inappropriate and decreases the val- 
ue of the journal to those of us who 
subscribe to and read it for what it 
claims to be: a journal of “Software 
Tools for Advanced Programmers.” 
Dr. Dobb’s is unique and uniquely 
valuable, and let’s keep it that way. 
In our department, we have a com- 
plete file of DDJ, some volumes of it 
(especially those with articles on 
Forth) getting dog-eared, and all of 
them well used. Of other journals, 
only a few back issues have been 
saved by our engineers, for articles on 
roll-your-own computers or compo- 
nents that they may build—someday. 
I would wager that this is pretty 





much the way it is with most DDJ 
readers. 

Even in the days when many, if not 
most, personal computer users oper- 
ated with homemade hardware from 
kits, DDJ addressed software rather 
than hardware needs. In these days of 
(almost) standardized and universal- 
ly available hardware, the audience 
for useful software articles is larger 
and still growing. 

Wayne C. Williams 
Greenville, NC 27834 


Unix Exchange 

Dear DDJ, 

I have a comment on Axel Shreiner’s 
June 1985 Unix Exchange column on 
tricks with the C preprocessor. In the 
section on program argument stan- 
dards, a set of argument parsing mac- 
ros are presented after the author 
writes “it would be so simple to devel- 
op a standard as in” the macros. 
Why, I ask, is a standard being pro- 
posed that has already been imple- 
mented in a software tool that is 
readily available? The getopt com- 
mand line option parser makes it sim- 
ple to parse Unix command line op- 
tions consistently, and unlike the 
proposed macros, is well accepted. 
Public domain versions of getopt 
have been posted to the USENET. In 
my opinion, the code written with get- 
opt is more readable than the macros 
presented in the article. One reason 
for this might be that the macros do 
not behave anything like functions in 
the C language, and so might have 
unpredictable behavior. 

Should you be interested, I would 
be happy to send a printed version of 
the getopt parser for your readers. 

Gary Perlman 
Wang Institute 
Tyng Road 


Tyngsboro, MA 01879 = bby 
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NHANCE PRODUCTIVITY. 
You'd like an operating system that meets your needs and suits your personal 
style. You want complete access to the full computing power of your IBM-PC, 
XT, or AT, with high-level functions like these: 


* REAL EVENT-DRIVEN SCHEDULING 

* MULTIPLE USERS PER PC 

* MEMORY MANAGEMENT 

* DEVICE INDEPENDENT 1/0 

* LOCAL AREA NETWORK SERVICES 

* LOGICAL NAMES FOR SOFTWARE OBJECTS 


Using Operating System Toolbox, you construct your own PERSONAL OPER- 
ATING SYSTEM in a matter of hours. We supply the complexity of a powerful 
operating system kernel — all you provide is a friendly user interface. 


PRIORITIZED EVENT-DRIVEN SCHEDULING. 

We've developed an event-driven scheduler similar to the one used by Digital 

Equipment Corporation in their VAX/VMS system. It runs processes based on 
_ Software priorities and the occurence of system events. That means that user 

Programs get the CPU when they need it, and relinquish it to other processes 

when they're waiting for resources or 1/0 to complete. 


THE SECRET? 

We've packed all of the system services, memory management, input/output, 
and scheduling code into a single toolbox that anyone with aC compiler and an 
IBM-PC, XT, or AT can use. Limited only by your creativity and imagination, 
just write your command language interpreter in your favorite language, like 
Pascal or C, and link it with the Toolbox. The resulting program is a complete 
Operating system that will support programs written in any language. Proc- 
esses execute in 4 different access modes, depending on the level of access to 
system data structures that is required. 


OPERATING SYSTEM INTERNALS REVEALED. 

Wendin supplies detailed information about how operating systems work to 

certified owners of Operating System Toolbox — not just how to use them, but 

specific algorithms and details of data structures used in the toolbox. That. 
means that you will know the capabilities of your personal operating system, 

and how it works. We even give detailed descriptions of how to build a user 

interface and give several examples in C, Pascal, and assembly language. 


INTEGRATION. 

integrate Operating System Toolbox with your application programs to make 
them support concurrency, advanced memory management, and input/out- 
put functions. Wendin does not charge royalties for object copies of Operating 
System Toolbox when integrated with your special applications. 


ENHANCED SYSTEM SERVICE SUPPORT. 


Personal operating systems automatically support MS-DOS and PC-DOS System Calls, as well as these ENHANCED SYSTEM SERVICES 


Device Dependent Input/Output Services Event Flag Services 


$ASSIGN Assign 1/0 Channel to Device SSETEF Set process event flag 

SDASSGN Deassign 1/0 Channel SCLREF Clear process event flag 

$Q10 Queue 1/0 Request to Device SREADEF Read process event flags 

$QIOW Queue 1/0 Request With Wait SWAITFR Wait for process event flag 
SALLOC = Allocate Device SWFLOR — Wait for logical OR of event flags 
$DALLOC Deallocate Device SWFLAND Wait for logical AND of event flags 


SGETCHN Get 1/0 Channel Information 
$GETDEV Get 1/0 Device Information 
SCANCEL Cancel 1/0 Request on Channel 


1/0 Services tor Mailboxes and Messages 
$CREMBX Create Mailbox and Assign Channel 
SDELMBX Delete Mailbox and Deassign Channel 
$BRDCST Send High-Priority Message to All 
SSNDSMB Send Message to Queue Manager 
SSNDOPR Send Message to Operator 


AST (Asynchronous System Trap) Services 
SSETAST Set AST enable 
$DCLAST Declare AST 


AL ee Ae 


Change Mode Services 
SCMKRNL Change Access Mode to KERNEL 
SCMEXEC Change Access Mode to EXECUTIVE 
SCMSUPV Change Access Mode to SUPERVISOR 
SCMUSER Change Access Mode to USER 
S$ADJSTK Adjust Outer Mode Stack Pointer 


Logical Name Services 
SCRELOG Greate logical name 
SDELLOG Delete logical name 
STRNLOG Translate logical name 


Timer and Time Conversion Services Process Control Services 


SGETTIM Get System Time SCREPRC Create Process 
S$NUMTIM Convert Binary Time to Numeric Time $DELPRC Delete Process 
SASCTIM Convert Binary Time to ASCII String $SUSPND Suspend Process 
SBINTIM Convert ASCII String to Binary Time SRESUME Resume Process 
SSETIMR Schedule delivery of AST SHIBER Hibernate Process 
SSETIME Set System Time SWAKE Wakeup Process 
: $SCHDWK Schedule Wakeup 
peel ae Services SCANWAK Cancel Scheduled Wakeup 
Xpand Region SEXIT Exit Image 
SCNTREG Contract Region SLODIMG Load Image Into Memory 
SCRETVA Create Virtual Address Space SEXEIMG Load and Execute image 
SDELTVA Delete Virtual Address Space SFORCEX Force Imace Exit 
SLKWSET Lock Pages in Working Set SSETPRN Set Oe Name 
SULWSET Unlock Pages in Working Set $SETPRI Set Process Priority 
apgete: _. es ete SSETRWM Set Resource Wait Mode 
MOK Frage In Memory $GETJP! Get Job/Process Information 
SSETPRT Set Protection on Pages 
SSETSWM Set Process Swap Mode 


PCUNIX $49.00 





_ WHAT IS PCVMS? 

____ PCVMS is similar to VAX/VMS, the popular operating system developed by 

__ Digital Equipment Corporation for their line of mainframe computers. Every- 
one thought such a sophisticated and elegant operating system could never 
work on a microcomputer. 


A MAINFRAME OPERATING SYSTEM ON A PC. 

That's when Wendin put PCVMS on IBM-PC, XT, and AT personal computers. 
And now, for the first time in history, you can get mainframe performance from 
your personal computer — at a fraction of the cost. PCVMS has the same 
powerful features you're used to, like MULTIPLE PROCESSES, MULTIPLE 
USERS, NETWORKING SOFTWARE, a RICH COMMAND SET. anda complete 
SET OF SYSTEM SERVICES. And it’s available for less than $50, with source 
code included. 
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Don’t get left behind . . . order your Personal Operating System today! 2 ( j 


Unix is a registered trademark of AT&T 

VAX/VMS is a registered trademark of Digital Equipment Corporation 

MS-DOS is a registered trademark of Micro Soft, Inc. 

PC-DOS is 2 registered trademark of iBM 

XTC, PCVMS. PCUNIX, Operating System Toolbox. Wendin, and Personal Operating System are trademarks of Wendin, {nc. 


AFFORDABLE UNIX FOR PERSONAL COMPUTERS. 

PCUNIX is Wendin’s implementation of the super-hit UNIX operating system 
developed at Bell Laboratories for PDP-11 minicomputers. Designed by Sys- 
tems programmers for systems programmers, a UNIX-like environment is 
ideal for developing system software. 


A MAINFRAME OPERATING SYSTEM ON APC. 

Just when you thought UNIX was going to need an IBM-AT computer, 20 
megabytes of disk space, and thousands of dollars for an AT&T license. 
Wendin put PCUNIX on the PC for a fraction of the cost. PCUNIX has the same 
powerful features you're used to, like MULTIPLE PROCESSES. MULTIPLE 
USERS, POWERFUL SYSTEM SERVICES, and the set of tools called the 
PROGRAMMER’S WORKBENCH. And it’s available for less than $50, with 
source code included. 
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by D. E. Cortesi 


Pascal Sources 

We did some reading before writing 
last month’s diatribe on Turbo Pas- 
cal. Hating to let good research go to 
waste and with the hope of finding 
one or two compiler implementors in 
the readership, we thought we’d list 
some of the better sources. All of 
these are from the British journal 
Software: Practice and Experience 
(SP&E). You should be able to find 
back issues in a university library. 


What To Optimize 

A lot of data has been published on 
the way people use language features, 
with profound implications for the 
design of a compiler’s generated 
code. The first paper on this sub- 
ject—and one of the most-cited com- 
puter science papers ever—is D. E. 
Knuth’s “An Empirical Study of For- 
tran Programs” (SP&E, Vol. 1, No. 
2, 2nd Quarter 1970). In this pioneer 
study of static and dynamic usage of 
language features, Knuth found what 
many others have since verified: the 
most-used features are the simplest 
ones, and the 80-20 rule is a good ap- 
proximation for dynamic execution 
frequency in most programs. 

A more recent work in this line is 
M. Shimasaki, e¢ a/., “An Analysis of 
Pascal Programs in Compiler Writ- 
ing” (SP&E, Vol. 10, No. 2, February 
1980). This team studied the static 
and dynamic frequency with which 
Pascal’s features were used, examin- 
ing several Pascal compilers written 
in Pascal. In static usage, they found 
that 30-40% of all statements were 
assignments, 30-40% were procedure 
calls, and most of the rest were IFs. 
The proportion of procedure calls 
was much higher than Knuth and 
others had found in Fortran and PL/I 
programs; furthermore, about half of 
the procedures were named only 
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once! This may not be typical of ordi- 
nary Pascal programs, as compilers 
are more likely to be planned and 
written in top-down modular style. 

When they compiled the compilers 
to P-code and instrumented the P- 
machine, they found that 40% of all 
executed instructions were load-to- 
stack operations. On breaking that 
down, they discovered 9% of all oper- 
ations were “load constant,” 19% 
were “load global variable,” while 
11% were loads from some level other 
than global. Of the latter, 71% (7.8% 
of all operations) loaded a local of the 
active procedure (this presumably in- 
cluded loading parameters). The re- 
mainder—only 3% of all opera- 
tions—referred to locals of some 
intermediate procedure. 

In “A Contextual Analysis of Pas- 
cal Programs” (SP&E, Vol. 12, No. 
2, February 1982), R. P. Cook and I. 
Lee reported a static analysis of 
120,000 lines of Pascal code. They 
produced some striking numbers: for 
example, that 89% of all subpro- 
grams had fewer than five local vari- 
ables or that 47% of all parameters 
passed were constants. 99% of all 
subprograms had five or fewer pa- 
rameters, and 92% had no more than 
two. These are important findings if 
you are designing a compiler’s sub- 
routine calling sequence. In a ma- 
chine with a few registers and a stack, 
should you try to pass parameters in 
registers? Definitely yes: if you have 
as few as two scratch registers, nine 
subprograms in ten will receive all 
their parameters in registers! 

Cook and Lee substantiated 
Knuth’s observation that the simplest 
features are the most used. Among 
many other numbers, they reported 
that 94% of all array references used 
but a single subscript, of which 19% 
were written as a constant and 63% 


as the name of a simple variable. A 
compiler that, when looking at a sub- 
script, checks for “name, delimiter” 
and ‘“‘constant, delimiter” before go- 
ing into a full expression parse is a 
compiler that will save time, four 
tries in five. 

As to stack-frame usage, they 
found references to intermediate- 
level names to comprise less than 2% 
of all references occurring in proce- 
dures and less than 3% of those in 
functions. This “would seem to indi- 
cate that expensive mechanisms to 
implement up-level frame addressing 
are largely unnecessary.” It would 
also seem to validate the design 
choice made in C—to have only local 
and global name scopes. 

We can’t resist pointing out that 
this kind of survey doesn’t require 
deep theoretical insight or great orig- 
inality. The information is genuinely 
significant and useful, but generating 
it requires only persistence, curiosity, 
read access to a quantity of source 
code, and—for dynamic studies— 
write access to the source code of a 
compiler. These things aren’t rare 
among DDJ readers; if you were to 
study, say, the usage of C constructs 
in public-domain code, DDJ would be 
pleased to publish the results. And 
you don’t have to do a broad-spec- 
trum census like the ones described 
here. A survey of a single feature— 
the use of operators in expressions, 
the number of locals or parameters, 
even the length of names—is worth 
doing, especially since one such sur- 
vey is likely to generate tools that can 
be used in others. 


How to Optimize 

We did run across a couple of papers 
that were truly original and insight- 
ful. No compiler designer should 
overlook them. 
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The first is J. Welsh’s “Economic 
Range Checks in Pascal” (SP&E, Vol. 
8, No. 1, January 1978). This paper 
doesn’t deserve the obscurity into 
which it seems to have fallen. Welsh 
describes how he made a Pascal com- 
piler use all the information available 
to it to identify which expressions 
might violate a subrange or array 
bound at runtime and which expres- 
sions absolutely could not. Knowing 
that, the compiler could generate code 
for runtime range checks where they 
were needed and omit them where 
they were not. The result was “highly 
successful” at reducing the cost of 
runtime checks to levels that are toler- 
able in production code. 

The implications of Welsh’s meth- 
ods go well beyond range checks on 
array subscripts and assignments to 
subrange variables. After all, binary 
integers are only a subrange of the 
natural numbers, so Welsh’s tech- 
nique applies equally well to any inte- 
gers. For example, it would allow the 
compiler to insert code to check for 
integer overflow where it might hap- 
pen and omit it where it can’t. Con- 
ceivably, the compiler, having for- 
seen potential—or inevitable!—inte- 
ger overflow, could try to make this 
impossible by rearranging an expres- 
sion or converting an intermediate re- 
sult to real. 

Better still, the technique permits 
the compiler to know exactly how 
much binary precision is required by 
many integer variables and many in- 
termediate results. Therefore, the 
compiler could allocate some vari- 
ables as bytes even when the pro- 
grammer had declared them as plain 
integer; or allocate byte-sized tempo- 
rary variables in some expressions; or 
do some integer operations (especial- 
ly comparisons) using faster byte- 
mode instructions. 

Best of all, a compiler using 
Welsh’s technique could give the pro- 
grammer marvelous feedback. It 
could issue warning messages like: 
‘“*This expression gets a runtime 
check because variable K might ex- 
ceed a value of 135.” You would look 
at your code and say, “Oh, so it 
might, I better fix that,” or you might 
say, “No, it can’t, I better declare K 
as a subrange instead of integer so my 
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THINK COMPUTER 


INNOVATIONS 


Level Debugging Support 


The C language has rapidly become the development language of choice 
for applications ranging from Operating Systems to Accounting Packages. 
WHY? Its structured approach and extreme portability make it perfectly 
Suited to today’s fast-paced environment. 

Of all of the C Compilers available for PC/MSDOS, more programmers 
choose COMPUTER INNOVATIONS’ C86. WHY? Because it’s part of a 
COMPREHENSIVE family of C products with an unparalleled reputation for 
performance, reliability, and stability. 


C86 2.3 C COMPILER 


C for PC/MSDOS began with C86 and today it remains perhaps the most solid, stable 
C Compiler available. Even competitor's ads show C86 as a consistent top level performer 
in benchmark testing. ee eae 

Version 2.3 offers a host of new features including source level debugging support and 
a 40% boost in compilation speed. Call for complete specifications. 
COST: $395 UPDATE TO 2.3: $35 w/old diskettes NOT COPY PROTECTED 
CALL ABOUT VOLUME DISCOUNTS 


LEARN C INTERACTIVELY WITH INTRODUCING C 


Intimidated by rumors about the difficulty of learning C? Need to train your staff quick- 
ly? INTRODUCING C can help. INTRODUCING C combines a thorough, self-paced 
manual with a unique C interpreter to provide a fast, efficient method of learning C. 
Designed for both professional and casual programmers, it provides a comprehensive 
understanding of important C concepts such as standard K&R syntax and operators, full 
Structures and unions, arrays, pointers, and data types. Requires IBM PC, XT, or AT with 
one disk drive and 192K bytes of memory. 

COST: $125 - NOT COPY PROTECTED 


Cl PROBE SOURCE DEBUGGER 


Take advantage of C86 2.3 source level debugging support with Cl PROBE. Cut down 
program development time and save money! Ci PROBE is highly economical yet has the 
features of debuggers costing far more. 

COST: $225 - NOT COPY PROTECTED 


C-TERP C86 COMPATIBLE INTERPRETER 

The C-TERP INTERPRETER is a full K&R implementation that allows you to write code 
and execute it immediately without the compile and link steps. Once you have your pro- 
gram running with C-TERP you can compile the code (without alterations) with C86 for 
fast, efficient executable files. C-TERP requires 256K, 512K is recommended. 
COST: C86 version - List Price: $300, Special Computer Innovations Price $250. 
een C86 & Lattice version - List Price: $400, Special Computer Innovations 
Price $350. 


Start With Us, Stay With Us 
Computer Innovations offers a complete range of products that let you 
enter the C environment and create applications with the most advanced 
set of development tools available. Unparalleled tech support assures that 
you're always at the height of productivity. 


To order call: $00-921-0169 


pu COMPUTER 
m= INNOVATIONS, INC. 


980 Shrewsbury Ave., Tinton Falls, NJ 07724 * (201) 542-5920 


C-TERP is a trademark of Gimple Software. Prices and specifications subject to change without notice. 
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intentions will be clearer.” 

Finally, anyone who cares about 
compiler design should read D. Han- 
son’s “Simple Code Optimizations” 
(SP&E, Vol. 13, No.8, August 1983). 
This is a superb paper, at once practi- 
cal and educational. From the ab- 
stract: “The simplicity of most pro- 
grams suggests that straightforward 
optimizations would produce the 
greatest dividends. This paper de- 
scribes three such optimizations suit- 
able for one-pass compilers ... none 
requires major changes to the size or 
structure of the compiler [but each] 
results in at least a 10% reduction in 


DISCOVER tHe LANGUAGE 


or ARTIFICIAL 
INTELLIGENCE: 


PROLOG V 


At last! A Prolog with enough muscle to handle 
real-world applications for UNDER $100! Discover 
why Japan has chosen Prolog as the vehicle for their 
“Fifth Generation Machine” project to design 


intelligent computers. 


CHOOSE FROM TWO GREAT VERSIONS: 


PROLOG V-Flus| PROLOG V 
$6995 


$9995 


object code size and a corresponding 
reduction in execution time.”’ 


Getting Standard 

If you want to write a verifiably stan- 
dard Pascal compiler—or bring an 
old one up to snuff (hint, hint)—you 
could begin in worse ways than by 
getting in touch with the Software 
Consulting Services of Lehigh Uni- 
versity (Ben Franklin Technology 
Center 125, Murray H. Goodman 
Campus, Lehigh University, Bethle- 
hem, PA 18015). There you can ob- 
tain the latest version of the British 
Standards Institute’s Pascal Valida- 









0 More Than 100 Predefined 0 70 Predetined Predicates 
Predicates 0 Small Memory Model 

0 Large Memory Model (to 640K) 0 Integer Arithmetic 

0 Floating Point Arithmetic 0 122-Page User's Manual 
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0 Clocksin & Mellish-Standard 
Edinburgh Syntax. 

0 Extensive Interactive Debugging 
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THE CHOICE OF UNIVERSITIES 


Generous university site licenses and an excellent teaching tutorial and 
reference guide have made PROLOG V the choice of universities nationwide. 
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rade to PROLOG V-Plus within 60 © 
ys for only the difference in price 
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tion Suite and Quality Control Pack- 
age. The Suite contains 740 test pro- 
grams. The Package consists of the 
Standard Pascal Model Implementa- 
tion (a complete Pascal compiler in 
ISO standard Pascal), a program that 
audits any Pascal source for ISO va- 
lidity (it has been applied to itself, of 
course), and a set of tools that let you 
automate your test runs under Unix. 

The notice of this offer (Sigplan 
Notices, Vol. 20, No. 6, June 1985) 
neglects to mention price or media 
formats. But it exists, so you’ve got 
no excuses left, Phillipe.... 


MSDOS Disk Speed 

When we published your figures on 
throughput, we remarked on how un- 
likely some of the MSDOS numbers 
seemed. Users of IBM PCs and Ze- 
nith Z100s reported throughput 
rates, using 5-inch diskette drives, of 
9 kilobytes per second and more. 
These were strikingly faster than the 
rates reported by any 8-bit system 
with similar disks and competitive 
with 8-bit systems using hard disks 
and M-drives. 

How does MSDOS do it, we asked, 
and perhaps we gave the impression 
we doubted the numbers. (We never 
supposed the numbers were false; we 
did suspect that some unreported 
buffering or caching factor in 
MSDOS was producing apparent high 
speed while not doing the same 
amount of I/O as other systems. ) 

Well, we’ve measured the effect 
with our own stopwatch and it’s real, 
alright. We still don’t know how it’s 
done, but we do know how your pro- 
grams can tap into it for a major 
speed improvement. 





Five Ways To Read 

There are five distinct ways for a pro- 
gram to request disk input in MSDOS 
on an IBM PC or compatible. The | 
modern, preferred way is to open a 
“handle” for the file with DOS func- 
tion 3Dh then use function 3Fh to ask 
for input of one byte up to 64K. 

Two ways are based on the CP/M- 
compatible functions that use a File 
Control Block (FCB). The program 
must first open an FCB with DOS 
function OFh and establish the Disk 
Transfer Area (buffer address) with 
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Tools That Make Your Job Easier 


For PCDOS/MSDOS (2.0 and above/128K) @ IBM PC/Compatibles, PC Jr., Tandy 1000/1200/2000, & others 













A general purpose text 
processor, the MIX Editor is 
packed with features that make 
it useful with any language. It 
has auto indent for structured 
languages like Pascal or C. It has 
automatic line numbering for 
BASIC (255 character lines). It 
even has fill and justify for 
English. 


Split Screen 


You can split the screen 
horizontally or vertically and 
edit two files simultaneously. 


Custom Key Layouts 


Commands are mapped to keys 
just like WordStar. If you don’t 
like the WordStar layout, it’s 
easy to change it. Any key can be 
Mapped to any command. You 
can also define a key to generate 
a string of characters, great for 
entering keywords. 


Macro Commands 


The MIX Editor allows a 
sequence of commands to be 
executed with a single 
keystroke. You can define a 
complete editing operation and 
perform it at the touch of a key. 


Custom Setup Files 


Custom keyboard layouts and 
macro commands can be saved 
in setup files. You can create a 
different setup file for each 
language you use. 


MSDOS Features 


Execute any DOS command or 
run another program from 
inside the editor. You can even 
enter DOS and then return to 
the editor by typing exit. 


For CPM80 2.2/3.0 (Z80 requited/64K) © 8” SSSD, Kaypro 2/4, Osborne I SD/DD, Apple II, & others 


Complete & Standz 


MIX C is a complete and 
standard implementation of C 
as defined by Kernighan and 
Ritchie. Coupled with a Unix 
compatible function library, it 
greatly enhances your ability to 
write portable programs. 


The Best C Manual 


MIX C is complemented by a 
400 page manual that includes 
a tutorial. It explains all the 
various features of the C 
language. You may find it more 
helpful than many of the books 
written about C. 





















Fast Development 


MIX C includes a fast single 
pass compiler and an equally 
fast linker. Both are executed 
with a simple one line 
command. Together they make 
program development a quick 
and easy process. 


Fast Execution 


The programs developed with 
MIX C are fast. For example, 
the often quoted prime 
number benchmark executes 
in a very respectable 17 
seconds on a standard IBM PC. 










































d Functions 


In addition to the functions 
described by K&R, MIX C 
includes the more exotic 
functions like setjmp and 
Jongjmp. Source code is also — 
included. 





Special Functions 


MIX C provides access to your 
machine’s specific features 
through BDOS and BIOS 
functions. The CHAIN function 
lets you chain from one 
program to another. The 
MSDOS version even has one 
function that executes any DOS 
command string while another 
executes programs and returns. 


Language Features 


® Data Types: char, short, int, 
unsigned, long, float, double 
(MSDOS version performs 
BCD arithmetic on float and 
double-no roundoff errors) 
@ Data Classes: auto, static, 
extern, register 
® Struct, Union, Bit Fields 
(struct assignment 
supported ) 
@ Typedef, Initialization 
® All operators and macro 
commands are supported 












function 1Ah. Then it can request 
that one record be transferred from 
the file to the buffer with function 
14h. The size of a record is set in the 
FCB; it may be any number from one 
byte up to 64K. Alternatively, the 
program may use function 27h to re- 
quest reading any number (from one 
to 64K) of records of the current size, 
so long as their aggregate length 
doesn’t exceed 64K. 

The fourth method of input is to 
use DOS interrupt (not function) 25h. 
This reads raw sectors unrelated to 
the file structure of a disk. In order to 
use it for file input, your program 
would have to interpret the FAT, disk 
directory, and subdirectories on its 
own. 

The fifth way is to call on the IBM 
or compatible ROM BIOS through in- 
terrupt 13h. Like DOS interrupt 25h, 
this provides raw sector input unre- 
lated to the file system. It’s even more 
device oriented, however, in that you 
have to address data by side and cyl- 
inder, whereas the DOS interrupt 
uses a scheme of “logical sector num- 
bers.” 





The Datalight C Compiler 
for MSDOS is a full C with 
all K&R constructs, 
including bitfields, 

plus the version 7 
extensions. Other features 
of the compiler are: 


linker is required. 


Floating point performed with 8087 or 


automatic software floating. 


= Over 100 compact library functions with source. 
=Compatible with the Lattice C compiler. 
#Runs on IBM-PC, and compatibles, running 


MSDOS 2.0 or later. 


=Complete, easy-to-read users’ manual with index. 
sHighly optimized code for production quality 


programs. 


Datalight 


11557 8th Ave. N.E. 
Seattie, Washington 98125 
(206) 367-1803 


Outside USA add $10 shipping. Washington State residents add 7.9% sales 


tax. VISA and MasterCard accepted. 


DATALIGHT 


= Produces object files (.obj) so just tme4ViSDOS 


We set out to see which of these 
ways was the fastest and, if possible, 
to figure out which of them produced 
those high throughput numbers and 
why. We ran a series of experiments 
on a DOS 2.1 system in an XT-ized 
PC. We confined our recorded mea- 
surements to the double-sided dis- 
kette drive; hard disks vary widely 
from brand to brand, and we couldn’t 
find out any of this one’s vital statis- 
tics such as number of tracks and cyl- 
inders or seek times. 

First we formatted a new diskette. 
On it we created a file of 16 cylinders 
(144K) using the BASIC program in 
Listing One (page 17). That file, 
which commenced in cylinder 1, was 
the data source for all experiments. 
The object was to see how fast it 
could be read. 

The DOS command Copy set the 
initial hurdle. We read the file with 


COPY TESTFILE.001 NUL 
and timed it: 9.8 seconds. That’s 


quick; just how quick wasn’t clear un- 
til we tried other programs. 






Measure Molasses 
Our first trial was written in BASIC 
(see Listing Two, page 17). BASIC 
makes it easy to calculate a program’s 
elapsed time. Unfortunately, we had 
no difficulty timing this one with a 
hand-held watch; it took 122 seconds 
to read the file. Although there’s no 
good reason why an I/O-bound job 
should run any faster when compiled, 
we figured it couldn’t very well run 
slower. It didn’t, but at 64 seconds it 
still wasn’t what we'd call fast. 
Maybe one of the other compiled 
languages would do better? We com- 
piled the program of Listing Three 
(page 17) with Microsoft Pascal ver- 
sion 3.3. It ran in 61 seconds. Then we 
tried the program in Listing Four 
(page 17), compiled by Microsoft C 
version 3.0. Sixty-one seconds, ho 
hum. Here’s how four language im- 
plementations do at reading a sequen- 
tial text file; the numbers are multi- 
ples of the Copy command’s time: 


BASICA 12.5 
BASCOM 6.5 
Pastal 3.3 6.2 


ee a a ae 
8 MHZ Z-80 COPROCESSOR 


TURBOSLAVE - P.C. 


8 MHZ Z-80H e FASTEST CPM 
128K RAM 

2 RS-232 PORTS e 
MULTIPROCESSOR e@ CPM-80 COMPATIBLE 
ARCHITECTURE e@ TRUE MULTI-USER 


@ P.C. COMPATIBLE @ LOW COST - $495. RETAIL 


COPROCESSOR 
16 TURBOSLAVES PER P.C. 


TUuRBOSLAVE P.C. TURNS YOUR I.B.M. INTO A MULTI-USER MULTI 
PROCESSOR SUPER MICRO. ONE TURBOSLAVE CAN BE USED AS A 
SIMPLE CPM COPROCESSOR BY ADDING THE TURBODOS oPERATING 
SYSTEM, UP TO 16 TURBOSLAVE P.C’S CAN BE ADDED, EACH 
SUPPORTING ONE USER ON A STANDARD TERMINAL ALL CPM 2.2 


PROGRAMS AND MOST MULTI-USER MPM APPLICATIONS CAN BE RUN 


UNDER TURBODOS. TRUE RECORD LOCKING AND PRINT SPOOLING 
ARE FULLY SUPPORTED. 


~~. 


— “Building Blocks For The Super Micro” 


TELEX: 9109976120 EARTH FV 


P.0. BOX 8067 @ DEPT. D1 @ FOUNTAIN VALLEY, CA 92728 


CALL: (714) 964-5784 


* S-100 VERSION AVAILABLE * 





REGISTERED TRADEMARKS: Z-80H, ZILOG INC; TURBODOS, SOFTWARE 2000, INC. 


IBM-PC, a trademark of IBM; MSDOS, a trademark of Microsoft Corp.; Lattice 


C, a trademark of Lattice Corp. 


Circle no. 29 on reader service card. 
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C30 6.2 

You can say this makes the lan- 
guages look bad, or you can say it 
makes Copy look extremely good. 
But how does Copy do it? 


Down to Brass Stacks 

The remaining tests had to be done at 
the assembly-language level. Rather 
than writing and assembling pro- 
grams for each of many tests, we used 
the Assemble command of Debug to 
write short programs. These could be 
parameterized by setting counts in 
their registers and by modifying con- 
stants with Enter. The entry of the 
handle-input test, for example, resem- 
bled Listing Five (page 16). Once that 
code was entered, the program could 
be set up for a certain input length by 
entering a new immediate value into 
one instruction. For example, 


-e 10e,48 


sets up to read two cylinders’ worth of 
data on each DOS call. 

We took a sequence of measure- 
ments, varying the number of bytes 
requested per DOS interrupt. For 
handle input, the results were: 


CX =bytes Seconds 
200h 61.8 
1200h 13.6 
2400h 10.2 
4800h 12.0 
9000h 10.2 


Reading a handle by sector-sized 
chunks (200h bytes) is clearly not a 
good idea (the similarity of that time 
to those turned in by the C and Pascal 
compilers is suggestive, however). 
Reading by tracks (1200h bytes) is 
five times faster, and reading by cyl- 
inders (2400h) is faster by a remark- 
able factor of six. But block sizes be- 
yond 9K, one cylinder, don’t give 
further improvement. 

The new handle operations (there 
must be a better name for them) are 
supposed to replace the older CP/M- 
like ones. To do that, they had better 
be no slower, and our tests indicate 
they are not. First we tried reading 
single records with function Ofh while 
varying the size of the record: 
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Record Seconds 
80h 64.5 
1200h 13.8 
2400h 10.0 
4800h 12.0 
9000h 10.0 


The results are practically identical to 
those for function 3Fh above—differ- 
ences of 0.2 second aren’t significant 
for hand-made timings. The time 
when reading 128-byte records is sug- 
gestively close to the BASCOM time. 

When we held the record size con- 
stant at 200h and read different num- 
bers of records with function 27h, we 
got identical times. The lesson is that 
no matter which DOS function you 
use, you should request at least 4,608 
(nine times 512) bytes at a time. To 
ask for less is to multiply your diskette 
input time by a factor of 3 to 6. 


Greased Lightning 

An assembly program reading full 
cylinders can approach the speed of 
the Copy command. Is that the limit? 
We suspected as much but continued 
our experiments. 

When we used the ROM BIOS in- 
terrupt 13h to read the same cylin- 
ders, the best time we could achieve 
was 13 seconds, 30% /onger than the 
best time we got with DOS input re- 
quests! Now we know two things: the 
DOS BIOS doesn’t use the ROM BIOS 
for its disk input, and DOS’s BIOS 
does it better. 

That made it mandatory to try out 
DOS interrupt 25h, presumably the 
foundation of the DOS file services. 
Here are the results: 


CX =sectors Seconds 
lh 56.0 
2h 31.0 
4h 19.6 
8h 12:3 
9h 6.8 
12h 6.8 
24h 10.2 
48h 8.5 


Now, ponder those numbers a mo- 
ment. The best times, as before, oc- 
cur when the program asks for one 
track or one cylinder per call. Our 
program set up by forcing the disk to 
cylinder 0; during the timed portion, 


it read cylinders 1-16, inclusive. 
That’s 32 tracks read plus 16 one- 
track seeks. It takes 200 milliseconds 
for a 5-inch diskette drive to rotate 
once. There are just 34 periods of 
200-milliseconds in 6.8 seconds. 
Therefore, DOS sequential input can 
reach and sustain an input rate of one 
track per disk rotation! 

Hurrah for DOS; no faster input 
rate is possible. But we are left with 
some mysteries. What does DOS do 
differently from the ROM BIOS to get 
such performance out of the diskette 
adaptor? Why is 4-cylinder input 
slower than 2-cylinder; why is 3-cylin- 
der input slower still? How does the 
Copy command interface to DOS? It 
consistently shaved a couple of tenths 
of a second off the best time we could 
get out of handle or FCB input. 

To summarize these results for- 
mally: for 1 Sn S 8, if a program 
requests n+1, 512-byte sectors on 
each input operation, its input time 
will be roughly proportional to 1/n. 
We can see the practical difficulties 
of giving every open file a 4,608-byte 
buffer, but still, isn’t it sad how slow 
your compiled programs run com- 
pared to the Copy command? 


DD] 


Reader Ballot 
Vote for your favorite feature/article. 
Circle Reader Service No. 190. 


STL 


° As Relational As They 
Get (for micros) 


e Word Processor Screen 
Editor Always in 


Operation 


e New, Faster Version 
for DOS 2, 3, AT 


Golemics, Inc. 
2600 10th St., Berkeley, CA 94710 
(415) 486-8347 
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Listing One 

168 ‘Create a 16-cylinder file on a d/s, 5-inch diskette 

118 OPEN "“TESTFILE.901" FOR OUTPUT AS #1 

126 LET D$ =. SPACE$(254) :' plus CR, LF = 256 bytes 

136 FOR CYL = 1 TO 16 

148 FOR SIDE = 6 TO l 

158 FOR SECTOR = 1 TO 9 :' DOS 2.x and above 

168 FOR BYTES = 1 TO 512 STEP 256 

179 PRINT#1,D$ 

186 NEXT BYTES 

199 NEXT SECTOR 

269 NEXT SIDE 

218 NEXT CYL i 
228 CLOSE #1 End Listing One 


Listing Two 


16 
118 
126 


"Read a file and see how long it takes 
' -- function to convert TIMES to seconds 
DEF FNSEC(X$) = 3688 * VAL(LEFTS(X$,2)) + 


68 * VAL(MIDS(XS$,4,2)) + 
VAL (RIGHTS (X$, 2) ) 


138 
146 
158 
1686 
178 
180 


OPEN "TESTFILE.@81" FOR INPUT AS #21 
STARTSS = TIMES 
WHILE NOT EOF(1) 

LINE INPUT#1,D$ 


WEND 


STOPS$ = TIMES 


IEEE 488 T0 S-100 
INTERFACE 


198 PRINT FNSEC(STOPS$)-FNSEC(STARTSS$) ;" seconds." End Listing Two 
Controls IEEE 488 (HPIB) Instruments with 
an S-100 computer 
Acts as controller or device 
Basic and assembly language drivers supplied 


Meets IEEE 696 specification 


Listing Three 


program reéadtest (output) ; 


var Industrial quality burned in and tested 
tin.:% text; up to 125K bytes/sec under software control 
dat : string(255); 3 parallel ports (8255-5) 
begin | $375 
assign(fin, 'TESTFILE.801'); 
reset (fin); 
writeln('start timing',chr(7)); 
while not eof(fin) do THE 
readlin(fin,dat) ; 
writeln('stop timing',chr(7)); 
end, End Listing Three | 
Listing Four 
#include <stdio.h> 
main () 
FILE *fin; 
char dat[256]; 
” (NULL != (fin = fopen ("TESTFILE.681","r"))) 
fputs("start timing \x7\n",stderr); 
while(NULL != fgets(dat,255,fin)) ; 
fputs("stop timing \x7\n",stderr); 
else 
fFputs("can't open file\n",stderr); End Listing Four 
Listing Five 
C>debug 
mE -O:--LELEL 8 
-e 89 ‘A:TESTFILE.091',8 
-a 168 


8C44:8199 mov dx,88 ; filespec string 
8C44:6163 mov ax,3d98 ; open it 
$C44:6186 int 21 

8C44:86188 mov bx,ax ; handle in BX 
6C44:6109A mov dx,208 ; data to DS:288 
8C44:819D mov cx,288 ; block size 
9C44:8119 mov ax,3f98 ; read CX bytes 
6C44:9113 int 21 

6C44:8115 cmp ax,cx ; read ok? 
9C44:8117 jz 118 ; if so repeat 
9C44:8119 nop ; breakpoint here 
6C44:811A mov ax,3e88 ; close BX=hdl 
68C44:811D int 21 

6C44:811F jmp 108 ; set up for next 
8C44:8121 “Cc 


D&W DIGITAL, INC. 
20655 Hathaway Avenue 
Hayward, California 94541 
(415) 887-5711 


End Listings 
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by Allen Holub 


Over the years DDJ has published sev- 
eral recursive descent compilers, most 
notable among which are the various 
versions of Small-C. This month we're 
going to talk about how this sort of 
compiler works. In the interest of clar- 
ity we'll reduce the problem from rec- 
ognizing a real computer language to 
analyzing a small arithmetic expres- 
sion, a function that is part of a desk 
calculator program. The same tech- 
niques are applicable to both. Our ex- 
pression analyzer will take as input an 
ASCII string representing an arithme- 
tic expression. Only numbers, paren- 
theses, and the operators + — / and* 
are legal. The analyzer will return the 
result of the evaluation. For example, 
if you give it the string (3+1)*2 the 
analyzer will return the number 8. 
The routine is pretty stupid, but the 
purpose of this exercise is to under- 
stand compilers, not to analyze com- 
plicated expressions. 

Every compiler has three function- 
ally distinct parts. These parts are of- 
ten combined, but it’s best to look at 
them as separate functions. The first 
part of the compiler is a “token” rec- 
ognizer. A token is some collection of 
ASCII characters from the input 
stream that are meaningful to the 
compiler when taken as a group. That 
is, a program can be seen as a collec- 
tion of tokens, each of which is made 
up of one or more sequential ASCII 
characters. For example, the ASCII 
character ; is a token in C, similarly 
the keyword while is a token. The 
matter is complicated by operators 
like +, ++ and +=, all of which are 
single tokens. A token is, then, a sort 
of programming atom, an indivisible 
part of the language (you cannot, for 
example, say wh ile) and a token rec- 
ognizer is a subroutine that, when 
called, will return the next token from 
the input stream. Usually tokens are 
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represented internally as an enumer- 
ated type or as a set of integer values 
corresponding to #defines in a header 
file somewhere, and the token recog- 
nizer returns this integer value. 
(Small-C doesn’t do this. Rather, var- 
ious subroutines within the compiler 
retrieve the tokens from input one at a 
time as they are needed.) 

The second part of the compiler, 
and the part that does most of the 
work, is the ‘“‘parser.”” The verb to 
parse retains its meaning when ap- 
plied to compilers: “to resolve (a sen- 
tence, etc.) into its component parts 
of speech and describe them gram- 
matically.”! Just replace the word 
“sentence” with “program.” Com- 
puter languages may be described by 
means of a formal grammar (we'll 
look at these in a moment) and the 
parser breaks up a program into its 
component parts and interprets the 
parts in a larger, grammatical con- 
text. That is, a parser organizes the 
tokens returned from the token rec- 
ognizer in such a way that the com- 
piler can generate code conveniently. 

A good (though not very practical) 
way to look at the process is as the 
creation of a “‘parse tree.”” For exam- 
ple, The expression (a — b)*(c — d) 
can be organized into the tree shown 
in Figure | (page 20). | 

The third part of the compiler, the 
code generator, traverses the parse 
tree in an orderly way, generating 
code according to certain rules. For 
example, if we do a “post order”’ tra- 
versal of the tree shown in Figure | 
(visit the left node, the middle node, 
the right node and then the root re- 
cursively) the tokens will be read in 
the following order: 


Va b=) e Ca oe ye 


Now, the expression may be evaluat- 


ed by applying the following rules to 
each token in the tree as it is visited: 


1) if the token is a parenthesis, do 
nothing; 

2) if the token is a variable (a,b,¢ or 
d), push the variable onto a stack; 

3) if the token is a minus (—), pop 
two items off the stack, subtract 
them and push the result; 

4) if the token is an asterisk (*), pop 
two items off the stack, multiply 
them together and push the result. 


When you’re done parsing (travers- 
ing the tree), the answer will be on 
the top of the stack. Owners of Hew- 
lett Packard calculators will be famil- 
iar with the process. In a real compil- 
er, the actual rule applied will be 
some function of the type of token 
found and the position of that token 
in the parse tree. 

There are several flavors of pars- 
ers.2 Most compilers use table driven 
parsers for several reasons. It’s easier 
to automate compiler creation with 
table driven parsers; they’re also more 
efficient. The Unix utility YACC (Yet 
Another Compiler Compiler), when 
given a formal description of a pro- 
gramming language, creates a set of 
tables that can be used by a generic, 
table driven parser. Similarly, LEX 
(LEXical analyzer) can output a C 
program that recognizes tokens.? 

Unfortunately, most public do- 
main compilers (and many commer- 
cial ones) don’t use the more sophisti- 
cated table driven methods (Small-C 
is no exception). These compilers use 
a parsing method known as “recur- 
sive descent.’’ Recursive descent 
parsers are easier to understand than 
their table driven cousins. However, 
they have disadvantages. They are in- 
herently inefficient, using large 
amounts of stack space, and con- 
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struction of them cannot be automat- 
ed. To change the way a recursive de- 
cent compiler works, you have to 
change the compiler itself. To change 
a table driven compiler you need only 
change the table. So, maintenance is 
a problem with recursive descent 
compilers. 























Grammars: Representing 
Computer Languages 
The best way to start writing a pro- 
gram is to reduce the problem to 
some sort of symbolic form. Pseudo- 
code, flow charts, Warnier-Orr dia- 
grams are all examples of this kind of 
symbolic reduction. Compilers are no 
exception to this process. When writ- 
ing a compiler, you start by repre- 
senting the programming language to 
be compiled in a formal, symbolic 
format called a “grammar.” Any one 
programming language can be de- 
scribed by several grammars. The 
type of parser you’re going to use will 
determine which of these is best for 
your application. The most useful no- 
tation used for grammars is the 
Backus-Naur Format (abbreviated 
BNF), which we’ll see in a moment. 
In order to create our expression 
analyzer, we need to start with a 
grammar. The first question to ask is: 
what exactly is an expression? You’ll 
remember from high school that an 
expression is composed of factors. A 
factor by itself (i.e. a single number) 
is an expression, as are two factors 
separated by an operator. BNF repre- 
sentations of these two rules are: 


<expression> ::= <factor> 
<expression> ::= 
<factor> <operator> <factor> 


We can save some typing by using the 
vertical bar to represent OR: 


<expression> ::= <factor> 
i <factor> <operator> <factor> 


-You’ll note in these definitions that no 
element of the BNF definition of the 
expression is a real symbol, one that 
can actually be found in the input 
stream. That is, <factor> and <op- 
erator> both have to be defined fur- 
ther before they can be related to a 
real program. Symbols, such as <fac- 
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tor>, which need further definition, 
are called “non-terminal” symbols. 
Symbols that can be found in the in- 
put are called “terminal” symbols. 
The four terminal symbols that can be 
Operators are + — / and *. A BNF 
rule for <operator> is: 


<operator> := +:1—1i*1/ 
Defining a factor is a little harder. 


A factor can be a number but it can 
also be another expression (as in: 


a+b—d, a+b is one factor and d is 
the second factor). A BNF definition 
of factor is: 


<factors= == <number>> 
| <expression > 


The only symbol yet to be defined is 
<number>. Since a number is an 
easy thing for the token recognizer to 
find, we’ll cheat a little and just de- 
fine <number> in English. Our en- 
tire grammar is shown in Figure 2 (at 
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right). 

Notice that every non-terminal 
used to the right of a ::= is also de- 
fined to the left and that no terminal © 
symbols are found to the left of a: = 
Let’s test the grammar by pluggingin 
an example: 1+2. 1 and 2 are both 
<number>s so we can replace them 
with the equivalent non-terminal 
symbols by using rule 4: 








1+ 2 a b 
<number> + <number> | 
Figure 1 

According to rule 3, a single number © Parse Tree for the Expression (a — b) * (c — d) 
is also a factor, so we can do another | . .._. 
replacement: 

<number> + <number> 1) <expression> ‘=  «<factor> 

<factor> + <factor> '  <factor> <operator> <factor> 
2) <operator> ee 


i 


3) <factor> 
4) <number> 


<number> | <expression> 


The + can be evaluated using rule 2: A string of ASCII characters in the range 0109 


| 


<factor> + <factor> 
<factor> <operator> <factor> . Figure 2 
ch de itary Expression Recognition Grammar 
And finally, by using rule 1, we can 
replace the above with a single 





<expression>: Grammar: 
1) cenemccaa ‘ee <factor> : 
<factor> <operator> <factor> 2) <expression> be <factor> ppemto <factor> 
3) Ss = ti -i*i/ | : 
<expression > 4) <factor> = <number> 
5) <factor> t= <expression> _ - 
So, we can reduce the input tokens 6) <number> —_::= Any string of ASCII characters in the range ‘0’ to a. _ 


1+2 to an <expression> using the 
rules of the grammar. Therefore, we 
conclude that 1+2 is a legal expres- 


Action rules: 
1) Do nothing. | 
2) Pop two objects off the stack, apply the operator remembered in rule 3 ane then 


sion in our grammar. push the result. - 
What if there’s an error in the ex- —_ 3) Remember the c operator for rule 2. 
pression? Let’s try to parse 1+*. We - 4) Push the number onto the stack. 


5) Do nothing. 


can apply rules 3 and 6 to yield: _ 
Pee yt 6) Translate the ASCII string into a number. 





<number> <operator> <operator> Figure 3 


_ Adding Actions to the Grammar | 
and then apply rule 4 to get: : 


<factor> <operator> <operator> 


_ rule: action: 
But there is no rule we can apply to © 1 + Ff | 
reduce this any further. So, we con- | <number> + 2 6 Translate ASCII to int | — 
clude that 1+* is not an expression © — c . eo hrale _ | 

_ <factor— + <number> 6 Translate ASCII to int 
as defined by our grammar. _. ~<factor> + <factor> 4 Push 2 
<factor> <operator> <factor> 3 Remember the + 

Parsing with a Grammar _ <expression> 2 Pop the 1 & 2, apply + and push de 
So a parser can be seen as a program result. 
that reduces a collection of input to- 
kens to a single non-terminal. We Figure 4 
have just ‘“parsed’’ the expression . _ Parsing 1 + 2 Using Grammar in Figure Three 


1+ 2. To turn a parser into a real com- 
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ply fe 
4 2 — Start here 
ae +2 - 3 6 Translate “1” to int 
_ -—factor> + 2 - S$ 4 Push 1 
_ <factor> <operator> 2-3 3 Remember + 
_ <factor> <operator> <number> — 3 6 Translate “2” to int 
<factor> <operator> <factor> -3 4 Push 2 
ee -—- 3s 2. Poptwo numbers, apply + and 
push result. 
iactor> — 3 1 Do nothing. 
_ <factor> <operator> 3 3 Remember—-  —> 
_ <factor> <operator> <number> 6 Translate “3” to int 
_ <factor> <operator>— <factor> 4 Push 3 
| Oech  i.#_s. 2 Pop two numbers off the stack, 
se _ _ subtract and push the result. 
_  £=WMegures 
~~ sOiParsing1 + 2 - 3 
_ <expr> = <factor— (1) 
| <factor> * <expr— (2) 
| <«<factor> / <expr— (3) 
; <factor> + <expr— (4) 
| <factor> -— <expr— (5) 
<factor> =  £{ <expr-) (6) 
i — ( <expre ) 7 
a -<constant> (8) 
{ — <constant> (9) 
- <constant> = 
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A stg of ASCII characters in the range “0- 9 
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piler, we need to make it do something 
active too, namely, generate code. So, 
we associate an action rule with each 
grammatical rule. Our grammar, 
slightly shuffled around and with ac- 
tion rules added is shown in Figure 3 
(page 20). Every time we apply a 
grammatical rule, we’ll also perform 
the action specified in the equivalent 
action rule. 1+2, parsed with the 
grammar in Figure 3 is shown in Fig- 
ure 4 (page 20). A somewhat more in- 
volved example is given in Figure 5 (at 
left). You’re beginning to see how the 
process works. If the action rules had 
generated the code necessary to per- 
form the operation, rather than actu- 
ally doing the operation itself, we'd 
have a compiler. 

As you’ve probably noticed, the 
grammar just defined isn’t very use- 
ful. At very least we'd like to have 
parentheses and negative numbers. 
We'd also like to be able to negate an 
entire expression (i.e. —(17*11)). 
You'll also notice in the above exam- 
ples that the expression is just parsed 
left to right, with all possible substi- 
tutions made as we parse. A more re- 
alistic grammar performs its substi- 
tutions in a somewhat more complex 
way, and the grammar has to reflect 
this complexity. In addition, a gram- 
mar has to be organized so that the 
parser can always tell what rule to 
apply based on the current input sym- 
bol and the current rule being pro- 
cessed. A better expression recogniz- 
ing grammar is given in Figure 6 (at 
left). We'll use this grammar in our 
actual program.4 


A Recursive Descent Parser 

The best way to see how a parser 
works is to look at one. Before dis- 
cussing the parser proper, I want to 
talk a little about how the program 
(Listing, page 25) is organized. The 
actual subroutines in the parser are 
highly recursive. As such, they'll use 
up a lot of stack space as they work. 
Because of this stack usage, we want 
to pass as few parameters as possible 
to the subroutines (because all these 
parameters take up stack space). So, 
we make global those variables that 
would normally be passed to the sub- 
routines as arguments. However, this 
practice, introduces new problems. In 
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C, all non-static global variables are 
shared between all modules in a pro- 
gram. But the expression parser is 
probably going to be a library routine 
and we don’t want it to interfere with 
the normal workings of the rest of a 
program. Moreover, we don’t want 
the programmer to have to remember 
that certain globals are used by a par- 
ticular library routine and can’t be 
used anywhere else. So, we make the 
globals static. We'll also make static 
those subroutines that are only used 
internally. Now, however, we need 
some way to initialize the static glo- 
bals from outside the parser module. 
We do this initialization with the 
“access routine” starting on line 84 of 
the Listing (the only externally ac- 
cessible subroutine in the module). 
This access routine (called parse( )) 
does nothing but initialize our globals 
and then call expr( ) to do the work. 

Another organizational concern is 
the main() routine on lines 34-79. 
The primary purpose of main( ) is to 
test parse( ), thus the #ifdef /#endif 
on lines 32 and 81. DEBUG is not 
#defined when we compile for inclu- 
sion in a library. The main( ) routine 
given is moderately useful in its own 
right. You can enter the expression 
(17/(2*12)) from the command line 
Or you can just type expr and then 
enter expressions as the program 
prompts you, sort of a rudimentary 
desk calculator. 

Moving back to parsers, there are a 
few things to notice about the gram- 
mar in Figure 6. First, the left-most 
symbol following the ::= is always e1- 
ther a terminal or the same non-ter- 
minal for all rules. That is, all rules 
associated with <expr> have <fac- 
tor> as their left-most symbol. The 
left-most symbol of all <factor> 
rules is either a terminal (( or —) or 
the non-terminal <constant>. The 
left-most symbol of a constant has to 
be an ASCII digit. This property of 
the grammar is required by the 
parser so that it can know what rule 
to apply in a given situation. For ex- 
ample, when evaluating an <expr>, 
the parser will always apply a rule as- 
sociated with <factor> first. 

A second property of the grammar 
is that the definitions for <expr> 
and <factor> are recursive. An 
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<expr> is defined in terms of other 
<expr>s. The recursion in <fac- 
tor> is two levels deep. A <factor> 
is defined in terms of an <expr>, 
which is in turn defined in terms of a 
<factor>. The recursion in the 
grammar suggests that we can also 
use recursion in a parser that imple- 
ments the grammar. 

So, given an appropriate grammar, 
we can translate that grammar di- 
rectly into a parser. In the program 
given here, all non-terminal symbols 
in the grammar have an equivalent 
subroutine with the same name. The 
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routine for <expr> starts on line 
104, for <factor> on line 124 and 
for <constant> on line 155. 
Looking again at the grammar in 
Figure 6, we see that the first thing 
done in all the <expr> rules (1-5). 
is to look for a <factor>. Similarly, 
the first thing the subroutine expr( ) 
does is call the subroutine factor( ) 
(on line 108). Looking back at the 
grammar, the next thing <expr> 
does is look for a terminal symbol (ei- 
thera * / + — ora null string). The 
equivalent code is the switch on lines 
110-117. The default case takes care 
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of the null terminal (rule 1). The re- 
cursive evaluation of <expr> in 
rules 2—5 is also done in the switch. 
On line 119 expr( ) returns the evalu- 
ated expression. 

Factor( ) is somewhat more com- 
plex. It first checks (on lines 
128-132) for the leading minus sign 
required by rules 7 and 9. After strip- 
ping off the minus, rules 6 and 7 be- 
come identical, similarly rules 8 and 
9 are identical once the minus is gone. 
So, factor( ) now decides which rule 
to process by looking for a leading ( 
(on line 134). If it doesn’t find the 
parenthesis, rule 8 is processed (line 
135) by calling the subroutine con- 
stant( ), otherwise rule 6 is processed 
by skipping past the parenthesis and 
then calling expr() (lines 138-139). 
We can also do some error checking 
here by looking for a close parenthe- 
sis when expr() returns (lines 
143-147). 

The final part of the parser is the 
routine constant( ) on lines 155-169. 
This routine is essentially atoi( ), 
however it advances the string point- 
er past the end of a number and flags 
an error if a number isn’t found. 

You'll note that in this program 
(and in the Small-C Compiler) the 
three functional parts of the compiler 
are merged together. There is no ex- 
plicit token recognizer, rather each 
routine is responsible for advancing 
the global string pointer (Str) past 
the token being processed. Similarly, 
the code generation part of the com- 
piler is integrated into the parser. In 
our example, code generation is re- 
placed by the various return state- 
ments. In a real compiler the routine 
factor( ) would generate code to push 
a value onto a run-time stack rather 
than return a value. The switch on 
lines 110 to 117 would be replaced by 
something like: 


switch( *Str ) 

{ 

case "S4-": 
Str -F; 
expr ); 
codegen(1 ); 
break; 

ease * =." 
sere 
expr( ); 
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codegen(2); 
break; 
ee 


} 


Since the code to push one number 
onto the stack is generated in fac- 
tor( ), The first number will be 
pushed by the factor() call on line 
108. By the time expr( ) returns, the 
code to push the second number will 
have been generated (by the factor( ) 
call inside expr( )). The call to code- 
gen(1) inside the switch generates 
the code needed to pop two numbers 
off the stack, add them together, and 
push the result. The codegen(2) call 
behaves similarly, but it subtracts 
rather than adds. 

So, that’s the bulk of the problem. 
Hopefully a better understanding of 
what’s going on will help when you 
try to sort out the workings of compil- 
ers such as Small-C. 


Footnotes 

! The Compact Edition of the Ox- 
ford English Dictionary (Oxford: 
Oxford University Press, 1971) p. 
2083. 

* A good, short, description of table- 
driven parsing techniques can be 
found in: Dr. Henry A. Seymour, 
“An Introduction to Parsing,” Dr. 
Dobb’s Journal, 98 (December, 
1984), pp 78-86. A more in-depth 
look at the subject, and at compiler 
design in general, can be found in: 
Alfred V. Aho and Jeffrey D. UII- 
man, Principles of Compiler De- 
sign, Reading, Addison-Wesley, 
1979; P. M. Lewis, D. J. Rosenk- 
rantz and R. E. Stearns, Compiler 
Design Theory (Reading: Addison- 
Wesley, 1976). 

> Axel T. Schreiner and H. George 
Friedman, Jr., Introduction to 
Compiler Construction with Unix, 
(Englewood Cliffs: Prentice-Hall, 


C Chest Listing (Text begins on page 18) 


1985) is the best guide to YACC 
that I know of. It takes you, step by 
step, through the entire process of 
generating a C compiler using 
YACC and LEX. More terse de- 
scriptions of both programs are in: 
Stephen C. Johnson, “Yacc: Yet 
Another Compiler-Compiler,”’ 
Unix Programmer’s Manual Vol. 2 
(New York: Holt, Rinehart and 
Winston, 1979) pp. 353-387 and 
‘“Lex—A Lexical Analyzer Genera- 
tor,” ibid., pp. 388-400. 

+ A grammar for the C language is in 
Kernighan & Ritchie, The C Pro- 
gramming Language (Englewood 
Cliffs: Prentice-Hall) 1978 p. 
214-219. 
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l: #include <stdio.h> 
= 
a he EXPR.C: (C) Copyright 1985, Allen I. Holub. All rights reserved 
ao > oe Evaluate an expression pointed to by str. Expressions evaluate 
og .* right to left unless parentheses are present. Valid operators 
Se 5-8 are * + - / for multiply add, subtract and divide. The expres- 
ot, ~* sion must be formed from the following character set: 
a * { @123456789+-*()/ }. White space is not allowed, 
e * 
fie. ® <expr> 235 <factor> 
L223 * | <factor> * <expr> 
L3s-* | <factor> / <expr> 
14: * | <factor> + <expr> 
\ i a | <factor> - <expr> 
16: * . 
Eps * <factor> 235 ( <expr> ) 
18: * | -( <expr> ) 
Gig oe | <constant> 
20: * | -<constant> 
eat F 
way. * <constant> ::= A string of ASCII chars in the range 'O'-'9', 
Zot. * 
2430 Bem wn nnn nnn nn eee 
25: * Global variables: 
26:3. * 
27: 
28: static char *Str ; /* Current position in string being parsed */ 
293 static int Error ; /* # of errors found so far */ 
30: 
S12 [Benn n nnn nn nnn nnn nnn nn nnn nnn nnn = = - = ---- == === - == - === ae 
32: #ifdef DEBUG 
333 
34: main(argc, argv) 
35: char **argv; 
362. { (Continued on next page) 
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C Ches f Lis ting (Listing Continued, text begins on page 18) 


373 /* Routine to exercise the expression parser. If an 
38: * expression is given on the command line it is 

39: * evaluated and the result is printed, otherwise 
4G; * expressions are fetched from stdin (one per line) 
41: $ and evaluated. The program will return -1 to the 
42: * shell on a syntax error, 9 if it's in interactive 
43; * mode, otherwise it returns the result of the 

44; * evaluation. 

45; x / 

46: 

47: char buf[{133], *bp = buf ; 

48; int err, rval; 

49: 

50: 1. aige:. oS 2: 4 

51: { 

52: fprintf(stderr, "Usage: expr [<expression>]"); 
a3. exit (> -1.°)? 

54: } 

aoe 

56: if (-arge:. >) 

57: { 

Os rval = parse( argv[l], &err ); 

59: printf(err 2? "*** ERROR ***" : "Sa jo: EVA 4$ 

60: exit-( Fevai--)s 

61: } 

62: 

63: printf("Enter expression or <CR> to exit program\n"); 

64: 

65: while( 1 ) 

66: { 

67: printet 2. 73 

68: 

69: if( gets(buf) == NULL || !*buf ) 

70: exit (0); 

71: 

72:3 rval = parse(buf, &err); 

+32 

74: if( err ) 

TS printf("*** ERROR ***\n"); 

763 else 

at printf("$s = d\n", buf, rval); 

78: } 

79: } 

89: 

81: #endif 

B22 | Bama a re em */ 
3 

84: int parse( expression, err ) 

85: char *expression; 

86: int *err; 

SF 20.5% 

88s /* Return the value of "expression" or @ if any errors were 
89: * found in the string. "*Err™ is set to the number of errors. 
98: * "Parse" is the "access routine" for expr(). By using it you 
91: * need not know about any of the global vars used by expr(). 
92: * 

93: 

94; register int rval; 

95.2 

96: Error = @; 

97: Str = expression; 

98: rval = expr(); 

oot return (*err: = Exrrorj:2 @ is Eval} 
198: } 
161: 

VODs [Rm mm - 


/ 
(Continued on page 28) 
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Now there is an even better structured, 
compiled programming environment than PROMAL. 
Introducing PROMAL 2.0 for the IBM PC, 

the Apple Il, and the Commodore 64. 


Ur now, the best next language 


for the serious programmer 

was PROMAL” Now, it’s the new 
PROMAL—PROMAL 2.0. 

PROMAL 2.0 provides the 


same sophisticated struc- > 


tured programming 
environment, the 
Same fastone-pass © 
compiler, the 

same speed of 
execution, the same 
powerful commands 
of the earlier release 
—plus a host of useful 
new features. 


Not just a language. 
A complete 
programming environment. 


PROMAL-the PROgrammer’s 
Micro Application Language— 
provides you with a complete pro- 
gramming environment, including 
a structured, high level language, a 
powerful program Editor, anda 
compiler that quickly turns your 
source code into compact, rapidly 
executing object code. Plus a 
library of integrated machine- 
language subroutines for fre- 
quently used tasks. And for the 
Apple Il and the Commodore 64, 
PROMAL provides a DOS-like 
operating system Executive. 


PROMAL 2.0— 
Even more ofa good thing. 


In addition to all of the features 
that have made PROMAL users 
declare it “the best language I’ve 
ever used,” PROMAL 2.0 provides: 
@ Overlays that can be 
compiled separately for modular 
programming. 
@ Program size greater 
than 64k. (IBM PC only). 


NEW for PROMAL 
The Graphics Toolbox* 


Twenty fast subroutines for creat- 
ing sophisticated, high-resolution 
graphics, including windows, clip- 
ping, scaling, and text-on graphics 
using scaled, rotated, user-defined 
fonts. $29.95. 


*Available for the Apple II and the 
Commodore 64 









@® True machine-to-machine 


portability. 


@ True 808X object code for 
the IBM PC. 


Let us prove that PROMAL is 
your best next language! 


Buy PROMAL 2.0 and 
try it for 15 days. If you 
don’t believe it’s your 
best next language, just 
return it fora full 
refund. 


PROMAL Features 


@ Structured language with 
indentation. 

@ Fast, one-pass compiler. 
® Simplified syntax. 
@ No line numbers. 
@ Multi-dimensional arrays, strings 
and pointers. 
@ Long variable names. 
@ Global, Local variables. 
@ Byte, Word, Integer & Real types. 
® Decimal or Hex numbers. 
@ Functions and procedures with 
passed arguments. 
@ Built-in I/O library. 
@ Control Statements: IF-ELSE, IF 
WHILE, FOR, CHOOSE, BREAK, 
REPEAT, INCLUDE, etc. 
@ Compiler I/O from/to disk or 
memory. 


Executive* 


Command oriented with line 
editing. 

Allows multiple user pro- 
grams in memory at once. * 

Function key redefinition. 

Program abort or pause. 


—_— 


Order Form 


My system is (check eae) 
OIBM PC/100% compatibles O Apple IIc/Ile 
CO Commodore 64/128 


CO) Developer’s Version—Compiler, Editor, 
Library, Demo disk, 280-page manual, (plus 
Executive for Apple and C-64) and stand- 
alone program generation. 
$99.95 + 5.00 s/h. 

O End-User System for Apple II and Commo- 
dore 64-all features al beveliipers version 
except stand-alone program generation. 
$49.95 + 5.00 s/h. 

LC) Demo System—32-page “Meet PROMAL’” 
manual and demonstration disk. 
$10.00 + 2.50 s/h. 

O Graphics Tool Box for PROMAL-~Available 
for Apple and C-64 only. $29.95 + 2.50 s/h. 


Circle no. 104 on reader service card. 


22 resident system commands. 
Unlimited user-defined commands. 
Prior command recall/edit. 

I/O redirection to disk or printer. 
Batch jobs. 


Editor 


Full-screen, cursor driven. 
Function Key controlled. 
Line insert, delete, search. 
String search and replace. 
Block copy/move/delete/ 
read/write. 
Auto indent, undent support. 
Edit after error. 


Library 


50 machine language commands. 

Memory resident. 

Call by name with arguments. 

Formatted real output, string oper- 
ations and much more. 


“Apple Il and Commodore 64 only. Requires 
one disk drive and 80-column card for 
Apple (Ile, IIc only). 


1-800-762-7874 


In NC: 919-878-3600 


Systems Management Associates 
3325 Executive Drive, Dept. D-1 
Raleigh, North Carolina 27609 


A 








4 







> 


QO My check is enclosed. 
CI Please charge to my 








—__ Visa __ Mastercard 
Card Number Expiration Date 
Signature 
Name 
Address 


City, State, Zip 


NC residents add 4-1/2% sales tax. 
Foreign orders add $15.00 additional s/h. 





C Ches f Lis ting (Listing Continued, text begins on page 18) 


193: 


194; ee int expr () 


195: 
106: 
187: 
198: 
199: 
1186: 
bats 
112: 
root 
114: 
115: 
116: 
117: 
118: 
119: 
120: 
izi: 
k22¢ 
1233s 
124: 
125: 
126: 
LZTs 
128: 
129: 
130: 
L3l: 
132: 
133: 
134: 
135: 
136: 
L372 
138: 
1393 
146: 
141: 
142: 
143: 
144; 
145: 
146: 
147: 
148: 
149; 
158: 
151: 
152: 
£533 
154: 
£553 
1563 
Lats 
1583 
159: 
168: 
161: 
162: 
163: 
164: 
165: 
1663 
1673 
168: 
1693 
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int lval; 


lval = factor(); 
switch (*Str) 
{ 


ty. 
tit. 


lval 
lval 
lval 
lval 


“bk 


case 
case 
case '*'s; 
case '/': 
pete : 


Strt++t+; 
Strt++3 
Strt++;3 
Strt+; 


NF 


return( lval ); 


static int factor () 


int rval = 90, 
lft sStr ae. =") 
{ 
sign = -l ; 
Str+t+; 


} 


12° *str ds. °C 

rval = constant(); 
else 
{ 

Str++3 

rval = expr(); 


Pf. (2 28tr S=:7)' 
Strt+t+3 
else 


{ 


=e ~6 “6 ~O@ 


break; 
break; 
break; 
break; 
break; 


printf£("Mis-matched parenthesis\n"); 


Errort+ }; 


} 


return (rval * sign); 


static int constant () 


int rval = oO: 


if (¢: big@dt6it(. *Str)) 


EEYTor?+r; 


while ( *Str && isdigit(*Str) ) 


{ 


rval = 
Strt+t+3 


} 


return( rval ); 


(rval * 10) + (*Str - 


-o° 4 


=e 


End Listing 
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The First Idea-Processor For Programmers. 





FirsTime 


Has features no other editor has. 


DWEO 25 


say" i vi 





ee, finns ral 


® Fast program entry through single keystroke statement generators. 

® Fast editing through syntax oriented cursor movements. 

® Dramatically reduced debugging time through immediate syntax checking. 
® Fast development through unique programmer oriented features. 


® Automatic program formatter. 


FirsTime is a True Syntax Directed Editor. 


As the world’s most advanced syntax-directed 
editor, FirsTime lets you work with ideas by taking 
care of the low-level syntax details of your program. 
For example, you can generate complete statement 
skeletons with one keystroke. Move the cursor from 
one procedure to the next with one keystroke. Type 
in code, and it’s instantly formatted (you specify the 
rules). Type an error, and FirsTime warns you 
immediately. You can continue working if you wish. 
Later, you can use the search-for-error command to 
find the error and fix it. 


FirsTime Has Thorough Error Checking. 
FirsTime not only checks your syntax, but also 
semantics. FirsTime identifies: 

e Undefined variables, types and constants. 

e Assignment statements with type mismatches. 

e Errors in include files and macro expansions. 


To Order Call: (201) 741-8188 or write: 
SPRUCE TECHNOLOGY CORPORATION 


P.O. Box 7948 
Shrewsbury, NJ 07701 


FirsTime is a trademark of Spruce Technology Corporation © MS-DOS is a 
trademark of Microsoft Corporation ® IBM is a trademark of International 
Business Machines Inc. ® Turbo Pascal is a trademark of Borland International 
e dBase lll is a trademark of Ashton-Tate. 


FirsTime Lets You Work With Ideas. 


The Zoom command gives you a top down view of 
your program logic. 


The View macro command shows the expansions of a 
C macro while in the editor. 


The View include file command instantly shows you 
the contents of an include file. 


The Transform command allows you to change a 
statement to another similar statement, for 
example, a FOR to an equivalent WHILE. 

The Search for next error command allows you to 
find errors throughout your program. 

The Cursor movement commands let you traverse 


your program by logical elements, not just 
characters. 


FirsTime Works With Existing Files. 


FirsTime works with standard ASCII files, so you can 
edit any existing source files. 


FirsTime for Turbo Pascal S 74.95 
FirsTime for dBase III $125.00 
FirsTime for MS—Pascal $245.00 
FirsTime for C $295.00 


In Germany, Austria and Switzerland contact: 
Markt & Technik Software Verlag 

Munchen, W. Germany 

(089) 4613-0 
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UNIX EXCHANGE 





by Axel Schreiner 


This column is reprinted from the German quarterly unix/ 
mail (Hanser Verlag, Munich, Germany). It is copyright- 
ed © 1984 by Axel T. Schreiner, Ulm, West Germany. It 
may be reproduced as long as the copyright notice is in- 
cluded and reference is made to the original publication. 


/lib/libc.a(signal.o) 

Signal(2)! does not generate a signal but is the meager 
protection offered against the cruelty of kill(2). This col- 
umn demonstrates how to deal with signals. Because this 
topic presupposes a broad range of knowledge, we start 
with a theoretical overview. 


Theory 
Signal is the term for a number of events that a process 
may encounter in a more or less unforeseen fashion: 


SIGHUP 

may happen when the controlling terminal is switched off 
(i.e., once the interface loses the carrier) 

SIGINT 

can happen if the interrupt key is pressed at the control- 
ling terminal, usually break or del 

SIGQUIT 

can happen if the quit key is pressed at the controlling 
terminal, usually * \ 

SIGKILL 

is signal 9, which can be sent explicitly with the kill com- 
mand or the kill(2) system call 

SIGSYS 

results from a system call with bad parameters—primari- 
ly if programs from a foreign operating system are run 
under Unix 

SIGPIPE 

is sent to the writer of a pipe, if the corresponding reader 
exits 

SIGALRM 

is received by a process once a time interval set up by 
alarm(2) has expired 

SIGTERM 

is signal 15, which is sent by kill as a default. 


There are 16 signals, ranging from 1 (SIGHUP) to 16. 
They result from events at the controlling terminal, 
through errors in the process itself, or through actions of 
other processes. Signal 16 has no predefined meaning. 
The list above does not contain the names of the signals 
provoked by arithmetic errors (e.g., division by zero), by 
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unknown machine instructions, or by access to nonexist- 
ing memory regions; these situations are somewhat ma- 
chine dependent. 

The system call kill(pid, sig) sends signal sig to the pro- 
cess pid. Kill(2) returns a 0 on success and —1 if, for 
example, a signal is sent to a nonexisting process. The 
super-user may send signals to arbitrary recipients; every- 
body else can send signals only to processes with the same 
user number. There is a process 0, but if a signal is sent to 
pid 0, it goes to all processes in the user’s own process 
group. The super-user, by sending a signal to pid — 1, 
reaches all processes in the entire system with the excep- 
tion of processes 0 and 1. This call is really only for the 
benefit of /etc/init (i.e., for the process controlling the 
timesharing operation). 

If a process does not take defensive measures, receiving 
a signal is deadly. For some signals, a memory dump is 
produced as a file core (assuming the process has appro- 
priate privileges with respect to the working directory, the 
terminated program text, etc.). SIGINT and SIGQUIT dif- 
fer precisely in that only SIGQUIT produces a memory 
dump. As a rule, you can terminate a process only by 
using the interrupt key. If the system is short of disk 
space, the super-user might occasionally execute 


find / -name core -a -exec rm {} \; 
to locate and remove all memory-dump cores. 
A process can defend itself against all signals with the 
exception of SIGKILL. 
#Hinclude <signal.h> 


signal(sig, SIG_IGN); 


SIG_IGN requests that the signal sig not be received by 
the process at all. 


int f( ); 
signal(sig, f); 


Receipt of the signal sig causes the function f to be called, 
which receives the signal number as an argument. 


#Hinclude <signal.h> 


signal(sig, SIG_DFL); 
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This finally restores the default setting (i.e., recognition 
that a signal is deadly and might produce a memory 
dump). 

Signal states (i.e., SIG_DFL, SIG_IGN, or acceptance 
by a function) are preserved across fork(2). SIG_IGN or 
SIG_DFL also remain in effect across exec(2). A catch 
function set up with signal(2), of course, cannot be re- 
tained across exec(2) (this system call eliminates program 
text and data in the running process); signals connected to 
a function are therefore implicitly returned to SIG_DFL 
during exec(2). 

Once a catch function has been set up using signal(2), it 
is invoked only once for most signals. As soon as the pro- 
cess receives the signal (i.e., even before the catch func- 
tion is actually called, the signal setting is returned to 
SIG_DFL for the next occurrence of the signal. That re- 
sults in a race condition: if a signal is received twice in 
rapid succession, it is very likely to be deadly. 

A catch function usually has the following form: 


#include <signal.h> 


static trap(sig) 
register int sig; 


signal(sig, SIG_IGN); 


signal(sig, trap); 


main( ) 


signal(SIGINT, trap); 


} 


At the beginning of the function, the signal state is set to 
SIG_IGN. At the end, the signal is reconnected to the 
same function. In between there can be essentially arbi- 
trary program text; however (on the PDP-11, for exam- 
ple), at this point the floating-point registers have not 
been saved. 

A catch function will typically set a global variable that 
is inspected in the main program at a suitable point. As an 
alternative, we can jump back into the main program: 


#include <setjmp.h> 
#Hinclude <signal.h> 


static jmp_buf reset; 


static trap( ) 


{ 

longjmp(reset, 1); 
} 
main( ) 
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TOTAL CONTROL 
with LMI FORTH” 


For Programming Professionals: 


an expanding family of 
compatible, high-performance, 
Forth-83 Standard compilers 
for microcomputers 


For Development: 


Interactive Forth-83 Interpreter/Compilers 

e 16-bit and 32-bit implementations 

Full screen editor and assembler 

Uses standard operating system files 

400 page manual written in plain English 

Options include software floating point, arithmetic 
coprocessor support, symbolic debugger, native code 
compilers, and graphics support 


For Applications: Forth-83 Metacompiler 

e Unique table-driven multi-pass Forth compiler 

e Compiles compact ROMable or disk-based applications 

e Excellent error handling 

e Produces headerless code, compiles from intermediate 
states, and performs conditional compilation 

e Cross-compiles to 8080, Z-80, 8086, 68000, and 6502 

® No license fee or royalty for compiled applications 


Support Services for registered users: 
e Technical Assistance Hotline 
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e Bulletin Board System 
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and prices. Consulting and Educational Services 
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Laboratory Microsystems Incorporated 
My Post Office Box 10430, Marina del Rey, CA 90295 
Phone credit card orders to: (213) 306-7412 
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setjmp(reset); 
signal(SIGINT, trap); 


Setjmp(3) arranges that a subsequent call of longjmp( ) 
has a target point: the program then will return a second 
time from the call to setjmp( ). The value returned is 0 the 
first time and the value of the second argument to 
longjmp( ) thereafter. Once the program returns to the 
main routine, a major command loop can be restarted and 
so on. This is the customary method for error and inter- 
rupt handling in programs such as ed. 

A process can die or enter a signal-catching function 
only if it is ready for execution. If a process is swapped, it 
must be brought back into main memory before it can die! 
This is especially true while executing code in a device 
driver; a process can be blocked by the driver so that it does 
not become ready to execute even when it receives a sig- 
nal—such processes can usually be eliminated only by a 
system restart. If you write device drivers, you should ar- 
range for suitable mechanisms (ioctl(2)) in the event a 
magnetic tape transport or a floppy disk drive goes on the 
blink. 

Take definitions in this section with a grain of salt: 
Berkeley Unix has more signals than, say, Unix Version 7, 
and there is even an additional signal state (SIG_HOLD) 
which eliminates the race condition in Unix Version 7. In 
an attempt to be generally applicable, our discussion is 
limited to Unix Version 7. 


Process Group and Controlling Terminal 

Starting Unix primarily means getting /etc/init to execute 
as process |. When the timesharing service is started, this 
process reads the file /etc/ttys and generates one process 
for each terminal, which is marked appropriately in this 
file. Each new process is the first one in a new process 
group, being the first in a chain of descendants to open a 
connection to a terminal device. The terminal itself is the 
controlling terminal of the process group. 

The controlling terminal is inherited during fork(2) and 
exec(2) even if there is no further file connection to it! The 
only way to obtain a process without a controlling termi- 
nal is to generate it via process | (in the file /etc/rc, from 
which the timesharing service is started) and never to con- 
nect such a process to a terminal. 


/bin/sh(wait) 
Signals caused at a terminal (i.e., SIGHUP, SIGINT, and 
SIGQUIT) are always sent to all processes in a process 
group. An interactive shell (i.e., one connected to a termi- 
nal for standard input and output) has to defend itself 
against SIGINT and SIGQUIT, otherwise a terminal ses- 
sion would be quickly over. 

Every shell ignores SIGQUIT. An interactive shell 
catches SIGINT, but the catch function does nothing. Asa 
consequence, the shell command wait can be terminated 
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using the interrupt key: wait(2) is one of the system calls 
terminated early by a signal. 

Because SIGINT and SIGQUIT are ignored by default in 
a background process, one can use wait $! rather than the 
much less efficient ps to discover if the last background 
process $! is already done; either wait does not happen 
(1.e., the command returns immediately), or the user inter- 
rupts the wait state using interrupt and knows that the 
background process is still active. 

Depending on the Bourne shell implementation, wait 
does not necessarily accept a parameter. Without a param- 
eter, the command applies to all background processes 
together. 

SIGTERM is also ignored by an interactive shell. This 
implies that you can use kill 0 in a dire emergency to elimi- 
nate all of your own processes, because the shell itself, and 
thus the terminal session, is not eliminated by SIGTERM. 


/bin/sh(logout) 

The C shell has a special logout command. For the 
Bourne shell, this command can be constructed by record- 
ing the process number of the login shell using the follow- 
ing commands in $HOME/.profile: 


SHELLID=$$; export SHELLID 


Logout then is the following shell script (e.g., in a file 
/usr/bin/logout): 


kill -16 $SHELLID 


With trap “echo logout” 0 in S$HOME/.profile, we can 
also report that a terminal session is about to be conclud- 
ed as a response to *D. 


/bin/nohup 

A background process will ignore SIGINT and SIGQUIT 
but not SIGHUP. This can cause background processes to 
die as soon as the terminal is turned off following the end of 
a terminal session. If your terminal interface and driver 
operate in this fashion, you should issue such background 
commands with the prefix nohup, which will insulate the 
command against a SIGHUP signal. Also, your successor at 
the terminal will be happier, because standard and diag- 
nostic output of your command will be redirected to a file 
nohup.out in your directory and not clutter up the screen. 


/bin/kill 

The kill command, Berkeley style, is used to send a signal 
to one or more processes. Usually, SIGTERM is sent, but a 
signal number may be specified explicitly. As an example 
of the kill(2) system call, we show a version of kill where 
the signal number may be specified mnemonically. The 
following Bourne shell script could be used: 


no= 

case $1 in 

-[Hh][Uu][Pp]) 
no=-1 shift:; 
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More Power Than You Thought Possible 


Arity offers the first serious implementation of Prolog for IBM personal computers. Arity/Pro- 
log is a powerful, highly optimized, and extended version of the logic programming 
language Prolog. Imagine building software applications with a language that solves prob- 
lems through deduction and logical inference. The task of creating complex programs is 
much faster and easier, resulting in lower development costs. Arity/Prolog is now in use in a 
wide range of applications in industry, business, research, and education. The solution— 
the Arity/Prolog Interpreter: 


li Interface to assembly 


i Source level debugger language and ‘C’ 
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with a workspace of 16 manipulation 
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_ @ Integrated program- 
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arithmetic 
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efficient text handling 
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grammar support 





Arity/Prolog Interpreter $495.00 


Arity also offers the Arity/Prolog Compiler and Interpreter, a sophisticated development envi- 
ronment for building Al applications. Essential for producing fast, serious production code. 


Arity/Prolog Compiler and Interpreter $1950.00 


The Arity/Prolog Demo Disk is available for $19.95. Hi Arity/Prolog products run on the IBM PC, 
XT, AT, and all IBM compatibles. lf To order, call (617) 371-2422 or use the order form below. 
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-*) 

no=$1 shift;; 
esac 
kill $no $* 


If we move /bin/kill, for example, to /usr/bin/kill and 
install this script as /bin/kill ... well, your system will 
recursively get a severe headache as soon as the next kill is 
issued. Your command search path PATH, which can be 
displayed using echo $PATH, normally consists of the ac- 
tive directory (i.e., of nothing) followed by /bin and then 
/usr/bin; kill in the last line of the shell script presumably 
will be found in /bin (i.e., will be the shell script just issu- 
ing the command!). To avoid recursion, the last line must 
reference the moved original kill command. 

By the way, a shell script always should fully qualify 
system commands or set PATH so that private commands 
cannot influence public shell scripts. 

The C shell executes kill itself; the Bourne shell, howev- 
er, does not. In an emergency, a user may have too many 
processes and no way to kill them from within the Bourne 
shell. The C program in Listing One (page 37) has the 
same capabilities as the shell script above. However, if the 
program is called as exec ekill ..., it does not need a 
separate process table entry, and it will return with a new 
copy of the Bourne shell. Called without an argument, the 
program will display a list of signal names. 

Observe that exit( ) must be explicitly called at the end 
of main( ); in this program, we define exit( ) so that either 
the current process calls up a Bourne shell using exec(2) 
or the process itself is terminated using —exit(). By the 
way, exit( ) cannot be defined local to the program (i.e., 
using static), otherwise library functions called by the 
program could still drag in the official version of exit( ). 

We have used two functions that may be useful in other 
applications: 
Hinclude <stdio.h> 
char *strsave(s) /* save string dynamically */ 
register char *s; 


register char *save = calloc(strlen(s) + 1, 
sizeof(char)); 


if (save) 
return strcpy(save, s); 
perror(‘‘strsave’’), exit(1 ); 


Although mentioned in the C book by Kernighan and 
Ritchie, strsave( ) unfortunately has not made its way 
into the C library. This version assumes that strepy( ) 
delivers its first argument as a result—which is claimed 
by string(3) but unfortunately not by the library that lint 
on our system uses for checking library calls.... 

The following function converts its string(!) argument 
to upper case: 
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#Hinclude <ctype.h> 


char *stoupper(s) 
register char *s; 


/* string to UPPER CASE */ 


register char *cp; 


for (cp = s; *cp; + +cp) 
if (islower(*cp)) 
*cp = toupper(*cp); 
return s; 


Note that (at least in some implementations) toupper( ) 
will deliver upper case even if the argument is not a lower- 
case letter! Actually, this is quite reasonable. If we al- 
ready know the character to be a lower-case letter, we 
need not call islower( ); this will save only a few microsec- 
onds if the call is not made implicitly by toupper( ). 


/etc/init 


Controlling Multi-user Service 

Process number 1, init, in some implementations of Unix 
Version 7 reacts to a signal and reads the file /etc/ttys 
again. A terminal can be included in multi-user operations 
if it is mentioned in this file on a line starting with 1. If the 
line starts with 0, the terminal is excluded. 

If init accepts a suitable signal, we can control multi- 
user service dynamically by changing /etc/ttys appropri- 
ately and then issuing the signal. This happens in the pro- 
gram in Listing Two (page 38), installed as attach and 
detach in Perkin Elmer’s Edition VII; attach arranges for 
the terminals mentioned as arguments to participate in 
multi-user operations and detach drops the terminals and 
eliminates the associated processes. 

Use these commands with some caution; if signals are 
sent to init in rapid succession, process | might be eliminat- 
ed and with it essentially the entire system! The program 
therefore must first modify the file for all arguments and 
then send a single signal. Because reading the file is the 
more expensive operation, we have elected to compare each 
line of the file with all arguments to the command. 

The terminal name appears at the end of a line in the 
file. We are willing to select a terminal based on the last 
few letters of its name. Of course, the argument e will 
then cause console as well as ttye to be attached or de- 
tached’... 

The program itself is quite simple: we copy /etc/ttys 
into a temporary file and change the relevant lines. For 
efficiency, we compare each line with all arguments be- 
fore writing it to the output file. Because attach is less 
destructive than detach, the program really must be 
called as detach for a terminal to be disconnected. 

If at least one line was changed, we replace /etc/ttys by 
the copy and inform init. Normally only the super-user 
can change /etc (!), therefore only the super user can cre- 
ate the copy. Thus renaming should be possible: 
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#include <stdio.h> 
rename(new, old) /* rename a file */ 
char *new, “old; 
unlink(new); 
if (ink(old, new) = = -1) 
{ 
fputs(old, stderr); 
fputs(”, ”, stderr); 
perror(new), exit(1); 


} 
if (unlink(old) = = -1) 
perror(old), exit(1); 


Blocking Signals 

While /etc/ttys is being replaced, we would prefer to be 
uninterrupted because we might otherwise find our sys- 
tem without a list of user terminals during the next boot- 
strap. Not even the super-user can prevent SIGKILL, but 
all other signals can be blocked with the following dis- 
able( ) function; a subsequent call to enable( ) will later 
restore the original situation: 


#include <signal.h> 


static int (*sigs[ NSIG-1])( ); 
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disable( ) 
{ 


register int 1; 


for Gi = 1;i< NSIG; ++ i) 
if (i != SIGKILL) 
sigs[i-1] = signalUi, SIG_IGN); 


enable( ) 
{ 


register int 1; 


for (i = 1;i1 < NSIG; ++ i) 
if (i != SIGKILL) 
signal(i, sigs[i-1 ]); 


/lib/libc(abort.0) 
At least according to chapter 3 of the manual, abort( ) 
executes the PDP-11 iot instruction and thus normally 
will terminate the process with a core dump. 

Beginning with Unix Version 7, one can send signals to 
oneself. A portable way to terminate a process with a core 
dump is the following: 


#include <signal.h> 
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abort( ) 
signal(SIGQUIT, SIG_DFL); 
kill(getpid( ), SIGQUIT); 


/bin/stty 

Depending on context, you may need to perform various 
cleanup tasks at various points in a program: somewhere 
there exists a temporary file, elsewhere a terminal echo 
may have been turned off, elsewhere yet a file may have 
the wrong protection keys, and in well-founded cases a 
second or third process might be on the prowl. It is rela- 
tively easy to deal with such cases, one at a time, as shown 
in Listing Three (page 39). 

Here echo( ) takes care of the necessary cleanup opera- 
tions. If the routine was called through a signal, the same 
signal is subsequently sent back to the process itself. 

In the general case, we should be able to stack the re- 
pairing functions by using the following functions; these 
mostly combine the ideas of disable( ) and abort( ): 


int catchall(f) int (*f)( ); 
declares, similar to signal(2), f as a reaction to all signals 
except SIGKILL. 


int catch(f) int (*f)( ); 
does the same, but only for those signals that are not 
ignored at present. 


int recatch(i) int i; 

calls the aforementioned function f( ), with the number of 
the signal effecting the call as an argument—at the begin- 
ning of this function, the signal itself has been set to 
SIG_DFL, and recatch(i) arranges for the signal i to be set 
just as it was set with the last call of catchall( ) or catch( ). 


int uncatch( ) 
arranges for all signals the setting that was in effect be- 
fore the last call to catchall( ) or catch( ). 


The functions return 0 on success and —1 on failure. 

We can use these functions to stack signal reactions. If 
we want to execute only the latest reaction, we conclude a 
trap function using recatch( ). If all reactions to the signal 
should be executed, we specify uncatch( ) at the end of 
each trap function and send ourselves the signal again. At 
the beginning of a trap function, the signal should be set 
to SIG_IGN in either case. 

The functions themselves are not very complicated. Es- 
sentially, they dynamically manage a stack on which the 
old settings of the signals are stored, as obtained from 
signal(2). See Listing Four (page 40). 

catch( ) contains the typical statements that should al- 
ways be used if SIGINT or SIGQUIT should be caught. The 
first call to signal( ) reports whether the signal is current- 
ly being ignored; in this case, the setting of the signal has 
not yet been changed. Only if the signal is not being ig- 
nored is it connected to the desired new reaction. These 
statements prevent a background process (for which these 
signals are ignored by default) from being subject to these 
signals again. 


/usr/games 

What does the program in Listing Five (page 40) do? Due 
to a complete absence of goto statements, this must be a 
so-called structured program. According to an often pub- 
lished opinion, however, such programs should be essen- 
tially immediately intelligible. Hint: Even if you do every- 
thing else as a super-user, don’t do so here. Otherwise 
your system will self-destruct, and this columnist shall 
disavow any knowledge of this program. 


Notes 
| Signal(2) here denotes the function signal(), explained 
in chapter 2 in the Unix Programmer’s Manual. 
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Unix Exchange (Text begins on page 30) 
Listing One 


#include <stdio.h> 
#include <signal.h> 
#include <ctype.h> 


#define eq(a,b) (stremp((a), (b)) == 0) 


Static char *signals[ |] = { 
“HUP”, “INT”, “QUIT”, “ILL”, “TRAP”, 
“OT”, “EMT”, “FPE”, “KILL”, “BUS”, 
“SEGV", “SYS”, “PIPE”, “ALRM", “TERM”, 
0}; 
Static char eflag; —_/* argv[O][O] */ 
exit(code) 
int code; 


{ 


/* terminate or new shell = 4 


if (eflag = = ‘e’ 
&& isatty(fileno(stdin)) 
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ee 


&& isatty(fileno(stdout))) 
execl("/bin/sh”, “sh”, “-i", 0); 
—exit(code); 


Static int signum(name) 
char *name; 


/* number of a signal */ 


register char **sig = signals, 
“ucase = stoupper(strsave(name)): 


while (*sig) 
if (eq(ucase, *sig+ +)) 
{ 
cfree(ucase); 
return Sig - signals; 
} 
return -1; 
} (Continued on next page) 
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Unix Exchange 
Listing One 


(Listing Continued, text begins on page 30) 


main(argc, argv) 
int argc; 
register char **argv; 


register int sig = SIGTERM; 


eflag = “*argv; 
if (*++ argv && **argv == ‘-’) 


if (isdigit(* + + *argv)) 
sig = atoi(*argv); 
else 
sig = signum(*argv); 
if (sig <= O |: sig >= NSIG) 
{ 


fputs(*argv, stderr); 


fputs(": is not a signal\n”, stderr); 


exit(1); 
} 
++ argv; 
if (*argv) 
do 
if (isdigit(**argv) 
&& kill(atoi(*argv), sig) == -1) 
perror(*argv); 
while (*+ + argv); 
else) 
for (argv = signals; *argv; + + argv) 
fprintf(stderr, “%d\t%s\n", 
argv - signals + 1, *argv); 
exit(O); 


Listing Two 


#include <stdio.h> 


#define LEN 20 


#define TTYS “/etc/ttys” 
#define TMP “/etc/ttys.tMpXXXXXX" 
#define TELL 


#define eq(a,b) (stremp/((a), (b)) = = O) 


main(argc, argv) 
int argc; 
char **argv; 
{ 
register char **argp; 
char buf[LEN], “last, 
*tmp = mktemp(TMP), 
set = *“*argv == ‘d‘?'0': ‘17; 
int change = O; 


if (| freopen(TTYS, “r’, stdin)) 
perror(TTYS), exit(1); 

if (! freopen(tmp, “w”™, stdout)) 
perror(tmp), exit(1); 

while (fgets(buf, sizeof buf, stdin)) 


End Listing One 


/* max. line length */ 
/* terminal table */ 
/* temporary copy */ 


kill(1, 2) == -1 && (perror(“init”), exit(1)) 
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last = buf + strlen(buf) - 
if (*last |= ‘\n’) 
{ 
fputs(buf, stderr); 
fputs(": too long\n”, stderr); 
exit(1); 
} 
*last = ‘\O’; 
for (argp = argv+ 1; *argp; ++ argp) 
if (**argp 
&& eq(last - strlen(*argp), *argp)) 
break; 
if (*argp && buf[O] != set) 
{ 


+ + change; 
buf[O] = set; 
} 
puts(buf); 
if (change) 


fflush(stdout); 
rename(TTYS, tmp); 
TELL; 


} 


else 
unlink(tmp); 


End Listing Two 


Listing Three 


#include <signal.h> 
#include <sgtty.h> 
#include <stdio.h> 


static struct sgttyb sgttyb; 


echo(i) 
register int |; 


stty(fileno(stdout), &sgttyb); 


if (i) 
kill(getpid( ), i); 
} 


main( ) 


{ 


int flags; 

gtty(fileno(stdout), &sgttyb); 

flags = sgttyb.sg_flags, sgttyb.sg_flags &= “ECHO; 
stty(fileno(stdout), &sgttyb); 

sgttyb.sg_flags = flags; 

signal(SIGINT, echo); 

echo(0); 


signal(SIGINT, SIG_DFL); 


End Listing Three 


(Listing Four begins on next page) 
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Unix Ex C hang € (Listing Continued, text begins on page 30) 


Listing Four 


#include <signal.h> 


Static struct signals { 
int (*S_sigs[NSIG-1])( ); 
struct signals *s_prev; 
} *top; 


Static struct signals *push( ) 
{ | 
register struct signals *p = (struct signals *) 
calloc(1, sizeof(struct signals)); 


if (p) 
p—s_prev = top, top = p; 
return p; 


} 


int catchall(f) 
register int (*f)( ); 
{ 
register int i; 
register struct signals *p = push( ); 


if (p) 


for (i = 1;i < NSIG; ++ i) 
if (i != SIGKILL) 
p—s_sigs[i-1] = signal(i, f); 
return O; 


return -1; 


} 


int catch(f) 
register int (*f)( ); 


register int i; 
register struct signals * p = push( ); 


if (p) 
{ 
for (i = 1;i < NSIG; + + i) 
if (| != SIGKILL 
&& (p—>s_sigs[i-1] = signal(i, SIG_IGN)) 
!= SIG_IGN) 
signal(i, f); 
return O; 
} 
return -1; 
} 
int uncatch( ) 
{ 


register int i; 
register struct signals *p = top; 


if (p) 
{ 
for (i = 1;i < NSIG; + + i) 
if (i != SIGKILL) 
signal(i, p—>s_sigs|i-1]); 
top = top—s_prev; 


cfree(p); 
return O; 
} 
return -1; 
40 


int recatch(i) 
register int i; 


if (top) 
signal(i, top—>s_sigs|I-1}); 
return O; 
} 
return -1; 
} 
End Listing Four 
Listing Five 


#include <signal.h> 
catch() {} 


main( ) 


{ 


int vater, ich, sohn; 


signal(16, catch); 
for (vater = O; ich = getpid( ); vater = ich) 
switch (sohn = fork( )) { 
default: 
pause( ); 
case -1: 
signal(SIGALRM, catch); 
alarm(2); 
getchar( ); 
alarm(O); 
if (vater) 
{ 
signal(16, catch); 
kill(vater, 16); 
pause( ); 


kill(sohn, 16); 
wait(0); 


exit(O); 
case O: 


End Listings 
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Over the years the Optimizing C86 has evolved to be the most complete 
set of C compiler tools. It includes utilities, a rich library, and thorough tech 
support. In line 8087/287 routines run up to 100 times faster than the 8086 
math package The source code to all routines is included, so you have 
complete control over how they work. Thorough ROM support, Intel UDI & 
VMS cross versions are available. 

More of the features you want include: 

e special IBM-PC library « 2 math and 2 1/0 libraries 
¢ full memory utilization of the 8086/88/186/286 
° compatibility with most commercial libraries 
e Version 2.3 has support for source 
level debuggers 


Fast File Access with Source 
C-Index + 


MSDOS $359 


C;Index + contains a high performance ISAM, balanced B + Tree index- 
Ing system with source and variable length fields. The result is a com- 
plete data storage system to eliminate tedious programming and add effi- 
cient performance to your programs 

Features include random and sequential data access, virtuai memory 
buffering, and multiple key indexes 

With no royalties for programs you distribute, full source code, and 
variable length fields C-Index + fits what you are likely to need 

Save time and enhance your programs with C—Index+. MSDOS $375 


File Management: MultiUser/MultiLanguage 
BTRIEVE 


Billions and billions of bytes! That's what you can control with Btrieve’s file 
manager. Btrieve gives you the ISAM Capability you need without the 
maintenance headaches. 

Using b-frees for optimum performance, Btrieve automatically maintains 
your files in sorted order on up to 24 different fields. And Btrieve offers you 
the fastest search algorithm available, to give you instantaneous access to 
any Individual record. You can locate any record in 4 disk reads or less 
(thanks to Btrieve’s RAM cache, usually less). With Btrieve you can stop 
wasting your time being a file clerk and concentrate on more productive 
tasks. 


Btrieve’s other features include: 
¢ 4 gigabyte file size 
¢ 4090 byte record length 
e 255 byte key length 
° duplicate, modifiable, and null keys 
e up fo 24 key indexes per file 
° automatic file recovery after power failure 


Btrieve’s Local Area Network version lets yOu migrate your software to 
mulfiuser environments without Changing your code. And offers you 
multiuser update capability beyond simple file locking schemes. Available 
for all programming languages as well as C. MSDOS.Single user $215 
Multiuser $545 

Btrieve. Don't settle for less. 


Call for details, comparisons, or for our °C Extras Packet’ with over 50 pages of information about C support products. 


THE PROGRAMMERS SHOP 


The programmer’s complete source for software, services and answers 


128-LC Rockland Street, Hanover, MA 02339 (617) 826-7531 (800) 421-8006 


Ask about COD and PO's. All formats available. Prices subject to change. Names of products and companies are generally their trademarks. 
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by Michael Swaine 


All code is built on algorithms, and 
all algorithms have to be communi- 
cated in code, even if only in pseudo- 
code. So how does this month’s DDJ 
more than any other month’s warrant 
description as an algorithms issue? 
Well, we’re presenting two articles 
that emphasize perennial algorithmic 
topics in programming: sorting and 
searching. Each of these articles 
takes a somewhat uncommon ap- 
proach, and presents a program that 
is algorithmically distinctive. We 
hope they’re more than distinctive, of 
course: we want to present algorithms 
that are of practical use to advanced 
programmers, so we've encouraged 
the authors to suggest applications in 
which their approaches might repre- 
sent the algorithms of choice. 

Sorting and searching algorithms 
are probably as thoroughly analyzed 
as any programming techniques. 
What follows here is not a definitive 
survey of sorting and searching tech- 
niques, but a summary of the common 
algorithms with the generally accept- 
ed judgements on their practical uses. 
None of this is new material, but it 
may set the stage for this month’s 
sorting and searching algorithms. 

Speed is the first performance 
measure we think of applying to a 
sort routine. But what speed? Worst 
case, best case, or “typical” case? 
And what’s typical? It’s known that 
any algorithm that sorts by compar- 
ing items must, for some sequence of 
n items, use O(n log n) comparisons; 
that is, the lower bound on the worst 
case is order-(n log n) time; but some 
algorithms have much worse worst- 
case times than this and still perform 
acceptably in most real-life situa- 
tions. And speed isn’t everything; it 
isn’t even particularly important in 
some applications. 
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Sometimes a simple sort algorithm 
is the best. If you’re sorting fewer 
than 100 items, if the sort routine will 
only be used once or twice and dis- 
carded, or if the data to be sorted are 
likely to be already nearly sorted, you 
probably would do just as well to im- 
plement a simple selection sort. The 
logic of this algorithm is lucid: find 
the smallest element, put it at the top 
of the list, and iterate down the list. 


algorithm Selectionsort; 
begin 
for i:=1 tondo 
begin 
min: +1; 
for j:=i+1 tondo 
if a[j]<a[min] then min: =); 
swap(a[i],a[min ]); 
end; 
end; 


Simple algorithms are simple to de- 
bug and make it easier to convince 
yourself of their correctness. Accord- 
ing to Robert Sedgewick, this simple 
selection sort algorithm is the tech- 
nique of choice if you are sorting files 
with large records and small keys and 
actually have to perform the rear- 
rangement, rather than just juggling 
indices. And it may be the technique 
of choice if you have to write a sort 
cold, have it running as quickly as pos- 
sible, and then discard it. But this is an 
O(n*2) algorithm; many situations call 
for something more efficient. 

Shellsort is a more efficient algo- 
rithm, and, although it’s well-known, 
it is also insufficiently analyzed. Its 
overall efficiency has yet to be charac- 
terized. It may not be as efficient as, 
say, Quicksort, but it can be perfectly 
adequate for many applications. Its 
efficiency depends on the selection of 
a set of values that control the granu- 


larity of its early passes through the 
file. In the degenerate case with gran- 
ularity 1 (k= 1), the core of the algo- 
rithm, presented here, moves gradual- 
ly down the list, keeping the upper 
portion of the list, above the item un- 
der consideration, sorted. That’s the 
core, and it is a sort algorithm unto 
itself, but the full Shellsort does more. 
By beginning with larger values for k 
and working down to k=1, Shellsort 
in effect removes some of the large- 
scale disorder from the file, giving the 
k=1 pass better data to work with. 
That turns out to be a good thing, 
since the core algorithm, hence the 
k = 1 pass, is especially sensitive to or- 
der; its worst-case performance is 
quadratic, its best, for a completely 
ordered file, linear. 

Shellsort is probably the simplest 
algorithm that represents a common 
technique in sort algorithms: shifting 
strategies as the data becomes more 
organized. In the case of Shellsort the 
shift is accomplished by adjusting 
one parameter, but in some variations 
on Quicksort quite different algo- 
rithms are employed at different 
stages in the sorting. 


algorithm Shellcore; 
begin 
for i:=2 tondo 
begin 
j=; 
while a[j—k]>al[i] do 
begin 
a[j]:=a[j—k]; 
cis 
end; 
a[j]:=ali]; 
end; 
end; 


Quicksort was invented by C. A. R. 
Hoare in 1960. It’s been widely used, 
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BRIEF 


“BRIEF Is The Best Editor I Have Ever 


Used. I Switched. I Use BRIEF Regularly.” 


Steve McMahon* 
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‘A BONA FIDE UNDO” Steve McMahon - BYTE 
REVIEW “BUILD YOUR DREAM EDITOR” MARCH 1985 


Here are Steve McMahon’s exact words: “...BRIEF 
implements a true undo facility, by default allowing 
command-by-command recovery from the last 30 
commands...The number of commands you want to 
be able to undo can be changed.’ (up to 300) “Only 
with BRIEF, though, was it possible to undo a macro 
that produced 4000 words of text with a single 
keystroke. 


EVERY FEATURE YOU WANT 
BRIEF supports practically every feature you've ever 
seen, and some you probably haven't thought of yet. 


Choosing the right program editor is an extremely 
important decision. After all, more time is spent with 
your program editor than with any other category of 
software. A good program editor helps to stimulate 
creativity and produce programs of superior design. 
A poor program editor, on the other hand, can be 
worse than none at all. It can slow you down, get in 
your way, and make even the simplest tasks difficult. 


BRIEF - PROGRAM EDITING YOUR WAY 


Every programmer has an individual style that 
makes their work unique. Most program editors com- 
promise that style by forcing the programmer to con- 
form to their methods. Not so with BRIEF. 
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e Edit Multiple Large ° 
Files 
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Unlimited File Size 
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BRIEF’s most powerful feature is its ability to 
conform to your way of programming. BRIEF can be 
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preferences. For example, keyboard reassignment 
allows the keyboard to be used in whatever way you 
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deeply analyzed, and much tweaked 
since then. It has a worst-case O(n*2) 
performance, but has O(n log n) ex- 
pected time under the assumption 
that all permutations of the to-be- 
sorted elements are equally likely. 
Quicksort is fast and relatively mem- 
ory efficient, and is often used in li- 
brary routines. : 

Quicksort is defined here as a re- 
cursive procedure. Its arguments, left 
and right, define the endpoints of the 
sort. Middle is a point selected by 
procedure Partition. Partition is any 
procedure that puts the middle-th el- 
ement (or identical elements) in its 
(their) proper place and ensures that 
all elements to the left of it (them) 
are less than it (them), and all ele- 
ments to its (their) right are greater. 
M is the number of identical ele- 
ments that Partition puts in their 
proper place. 


algorithm Quicksort(left,right); 

begin 

if right>left then 
begin 
Partition(left,middle,right); 
Quicksort(left, middle — 1); 
Quicksort( middle + m,right); 
end; 

end: 


Various methods have been em- 
ployed to improve Quicksort’s perfor- 
mance, such as R. S. Scowen’s 
Quickersort and M. H. van Emden’s 
Qsort (algorithms 271 and 402 in the 
Collected Algorithms of the ACM, 
respectively). Unwinding the recur- 
sion is one technique that can in- 
crease the speed. Another method in- 
volves abandoning the algorithm for 
something like Shellcore for very 
small subfiles. A third technique 
helps to avoid worst-case times: it in- 
volves using some sort of randomiz- 
ing technique in Partition to select 
the middle point. 

Heapsort is an efficient sort algo- 
rithm that uses a data structure that 
has applications in queuing. One of 
its virtues is that it has O(n log n) as a 
worst-case time. The algorithm 
works by constructing a semiordered 
tree structure called a heap, sawing 
off the root (which will be the largest 
element remaining), rebuilding the 
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resulting forest into another heap, 
and iterating. Procedure Heapprop 
rearranges items to ensure that the 
heap property applies. Makeheap 
constructs the initial heap. 


algorithm Heapsort; 
begin 
Makeheap; 
for i:=n to 2 step —1 do 
begin 
swap(a[ 1 ],a[i]); 
Heapprop(i— 1); 
end; 
end; 


Bubblesort is a curious phenome- 
non. I learned it early in my program- 
ming experience. You probably did, 
too. Does anyone know why? It is nei- 
ther very simple nor very efficient, 
and its detailed operation is less clear 
than that of other sorts, although its 
operation is not hard to describe. Es- 
sentially, it consists of a number of 
passes through the file, swapping ad- 
jacent elements as necessary. 


algorithm Bubblesort; 
begin 
repeat 
t:=al[1]; 
for j:=2 tondo 
if a[j—1]>al[j] then 


begin 
t:=alj—1]; 
swap(a[j],a[j—1]); 
end; 
until t=a[ 1]; 


end; 


How you sort depends on what you 
have to sort, including how it is al- 
ready arranged as well as other as- 
pects of the data. Another criterion 
you might apply to a sort algorithm is 
stability. If you intend to sort on 
more than one key and not have the 
sorting on one key destroy the sorting 
on the other, you need a stable sort. 
There are instances in which this is 
not necessary, and there is much 
power in knowing what you can get 
along without. In this issue (page 68) 
we present a sort algorithm that has 
some speed advantage when stability 
is not a consideration. 

Knowing that the data is not ran- 
domly arranged can also have a 





marked effect on the expected perfor- 
mance of the algorithms. One of the 
most common sorting situations in- 
volves adding a few items to an al- 
ready sorted file; here the more so- 
phisticated algorithms can’t compete 
with such simple algorithms as Shell- 
core. Finally, in sorting files too large 
for in-core methods, tape or disk ac- 
cess speed limitations can override all 
other considerations in searching for 
a fast algorithm. The basic algorithm 
for external sorts is: sort (relatively) 
small chunks of the file in memory, 
then merge these sorted chunks. 
Much of the analysis of external sort 
algorithms has to do with minimizing 
trips to the external well. In a virtual 
memory system, Sedgewick argues, it 
is reasonable for certain in-core algo- 
rithms (like Quicksort) to ignore the 
problem of external reaches entirely, 
since the sort’s minimization criteria 
coincide with those of the designer of 
the virtual memory system. 

Searching algorithms encompass a 
large chunk of computer science. 
Parsing, for example, is built on pat- 
tern matching, which is searching. 
Efficient implementation of a data- 
base hinges on good search algo- 
rithms. Move-search routines in 
chess programs implement some very 
complex strategies for finding things. 
Search techniques depend intimately 
on the data structure being searched, 
and many search algorithms are fun- 
damentally more complex than the 
sort algorithms presented here. 
Search algorithms are harder to spec- 
ify in a few lines. 

The simplest search algorithm is a 
sequential scan of the file, and it has 
an advantage in addition to its sim- 
plicity: it does not upset the organiza- 
tion of the file. Generally, though, 
speed is a consideration, and an algo- 
rithm like a binary search is warrant- 
ed. Binary search splits the (sorted) 
file more or less in half at each step, 
restricting its subsequent search to 
the appropriate half of the remaining 
file. This cuts search time from a lin- 
ear function of the number of items in 
the file to a logarithmic function. Bi- 
nary search can proceed implicitly on 
a linearly-organized file or can in- 
volve explicit construction of a binary 
tree. Other search methods involve 
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using B-trees and hash functions, two 
subjects we expect to expand on in 
future issues. 

This issue of DDJ focuses on useful 
algorithms, and is intended to serve 
as a prelude to a new emphasis on al- 
gorithmic analysis of the program 
listings in DDJ. The reason for such 
an emphasis is simple: to increase the 
portability and usability of the tools 
we publish. Processor-specific maga- 
zines can get away with publishing 
processor-specific code. We don’t 
want, and we think you don’t want 
DDJ to become a processor-specific 
magazine, so we’re trying to broaden 
the applicability of our offerings by 
providing the keys to allow you to ex- 
tract what you can use from the list- 
ings. Those keys include, we think, 
well-documented high level code and 
clear discussion of the underlying al- 
gorithms and useful techniques em- 
bodied in the code. 

And what about someday-useful 
algorithms? The algorithmic cutting 
edge? The Fgrep algorithm in this is- 
sue uses limited parallelism to gain 
speed. Next month we’ll look at the 
Novix Forth chip and what it gains 
from a little parallelism. But deep 
parallelism of the sort realizable in 
multiprocessor machines of the fu- 
ture will require different algorithms, 
different models of the computer. 
What lies beyond Von Neumann ar- 
chitecture? We hope to investigate 
parallelism in upcoming issues of 
DDJ. 


DD] 
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How to go 


om 
UNIX to DOS 


without 


compromising 


your 
standards. 


It’s easy. Just get an industry standard file access 
method that works on both. 

C-ISAM™ from RDS. 

Its been the UNIX™ standard for years (used in 
more UNIX languages and programs than any other 
access method), and it’s fast becoming the standard 
for DOS. Why? 

Because of the way it works. Its B+ Tree index- 
ing structure offers unlimited indexes. There’s also 
automatic or manual record locking and optional 
transaction audit trails. Plus index compression to 
save disk space and cut access times. 

How can we be so sure C-ISAM works so well? 

We use it ourselves. It’s a part of INFORMIX; 
INFORMIX-SQL and File-it!" our best selling data- 
base management programs. 

For an information packet, call (415) 424-1300. 
Or write RDS, 2471 East Bayshore Road, Palo Alto, 
CA 94303. 

You'll see why anything less than C-ISAM is just 
a compromise. 


o~\ 


ke 


RELATIONAL DATABASE SYSTEMS, INC. 


© 1985, Relational Database Systems, Inc. UNIX is a trademark of AT&T Bell Laboratories. INFORMIX is 
a registered trademark and RDS, C-ISAM and File-It! are trademarks of Relational Database Systems, Inc. 
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Parallel Pattern 
Matching 
and Fgrep 


by lan Ashdown 


The file-search utility Fgrep is not as 
flexible as Grep, but its parallel 
pattern-matching algorithms allow for 
one-pass processing. 
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all references to one person in several years’ worth of 

minutes of meetings; searching for all occurrences of 
a specific sequence of events in the data obtained from a 
scientific experiment: all of these problems and many 
more are examples of searching for patterns in a set of 
data. The question is: What is the most efficient search 
algorithm to use? 

For single patterns, such as searching for the phrase “‘bi- 
nary tree” in a text file, two algorithms are of particular 
interest: the Boyer-Moore algorithm! and the Knuth-Mor- 
ris-Pratt algorithm.’ Both are fast and reasonably simple 
to implement. However, neither is appropriate when more 
than one pattern at a time must be searched for. 

An algorithm that is appropriate for multiple patterns 
appeared in a paper published in the June 1975 issue of 
Communications of the ACM.> Entitled “Efficient String 
Matching: An Aid to Bibliographic Search” and written 
by Alfred Aho and Margaret Corasick of Bell Labora- 
tories, the paper presents “‘a simple and efficient algo- 
rithm to locate all occurrences of any of a finite number of 
keywords in a string of text.”” Without modification to the 
algorithm, “keyword” can be taken to mean any pattern 
and “‘a string of text’ to mean any sequence of symbols, 
be it ASCII text, digitized data obtained from a video 
camera, or whatever. 

The algorithm has some interesting features. For in- 
stance, most pattern-matching schemes must employ 
some form of backtracking, or rescanning of the string, 
when an attempted match to a pattern fails or multiple 
patterns are to be matched. The Aho-Corasick algorithm 
differs in that it searches for all of the patterns in parallel. 
By doing so, it can process the string in one pass. 

The algorithm also recognizes patterns that overlap in 
the string. For example, if the patterns are “he,” “she,” 
and “hers,” the algorithm will correctly identify matches 
to all three in the string “‘ushers.”’ 

As for speed of execution, it is independent of the num- 
ber of patterns to be matched! This surprising feature is a 
direct result of searching for the patterns in parallel. 

Curiously, this algorithm has all but disappeared from 
the literature of computer science. Of the hundreds of 
textbooks and articles written since that time that discuss 
pattern matching, only a few refer to the paper, and none 
that I am aware of present the Aho-Corasick algorithm 
itself. 

On the other hand, if you work with Unix you may have 
used a utility based on the algorithm: Fgrep. This useful 
tool searches for and displays all occurrences of a set of 
keywords and phrases in one or more text files. Although 
it does not accept wildcard characters in its patterns like 
Unix’s more flexible grep utility, fgrep does illustrate the 
speed of the Aho-Corasick algorithm. Typically, fgrep is 
five to ten times faster than grep in searching files for 
fixed string patterns. 


P reparing an index to a large technical book; finding 


Ian Ashdown, byHeart Software, 1089 W. 21st St., 
North Vancouver, British Columbia V7P 2C6 Canada 
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Given the algorithm’s general usefulness, I thought it 
appropriate to reintroduce Aho and Corasick’s work in 
this article. At the same time, it seemed a shame that 
fgrep has been restricted to Unix. Therefore, the source 
code in C for a full implementation of fgrep* has been 
included (see the listing, page 54). This serves not only to 
demonstrate the algorithm but also to bring the idea of a 
public domain Unix one small step closer to reality. 


Inside the Machine 

The Aho-Corasick algorithm consists of two phases: build- 
ing a finite state automaton (FSA) then running a string of 
data through it, with each consecutive symbol considered a 
separate input. Before we analyze these phases, a quick 
summary of what finite state automata are and how they 
work is in order. (For a more detailed discussion, see Aho 
and Ullman’s book on compiler design.) 

In essence, an FSA is a conceptual machine that can be 
in any one of a finite number of “‘states.”’ It also has a set 
of “‘state transition” rules and a set of “inputs,” which 
together with the set of states define what inputs cause 
the machine to change from one state to another. Finally, 
because a machine serves no purpose without producing 
some output, an FSA has one or more “‘terminal”’ states. 
Output is produced only when the FSA enters such states. 

A physical example of an FSA could be a light switch. 
This device has two states, on and off. Its inputs consist of 
someone pushing the switch up or down. On is a terminal 
state, where the associated lamp produces visible radia- 
tion. The state transition rules can be presented in a sim- 
ple truth table: 


Off On 
Up On - 
Down - Off 


Alternatively, the rules could be shown as a state transi- 
tion diagram (Figure 1, page 47) where no state transition 
on a particular input (as shown in the truth table) is 
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equivalent to a transition from a state to itself (as shown 
in the diagram). 

Getting ahead of ourselves for a moment, let’s look at 
Figure 2 (page 47). Figure 2a shows part of an FSA (the 
other parts shown in Figures 2b, 2c, and 2d, will be ex- 
plained shortly). By having sequences of states, the FSA 
can recognize patterns in an input stream. For example, 
presenting the string “‘she”’ to the FSA shown in Figure 2a 
would cause it to change from State 0 to States 3, 4, and 5 
as each input symbol of the string is processed. State 5 isa 
terminal state that indicates that the pattern “‘she” was 
recognized. 

Two types of FSA can be built, one nondeterministic 
(Algorithm 1, page 48) and the other deterministic (Algo- 
rithm 2, page 48). The nondeterministic one (NFSA) uses 
functions called go_to, failure and output, while the deter- 
ministic FSA (DFSA) uses move and output. The differ- 
ence between the two is that the NFSA can make one or 
more state transitions per input symbol, but the DFSA 
makes only one. With fewer transitions to make, a DFSA 
can process its input in less time than an equivalent NFSA. 

The go_to function accepts as input parameters the 
current state of the NFSA and the current input symbol, 
and it returns either a state number (the go_to state tran- 
sition), if the input symbol matches that expected by the 
patterns being matched, or else a unique symbol called 
FAIL. The only exception to this is State 0: go_to(0,X) 
returns a state number for all input symbols X. If symbol 
X does not match the beginning symbol of any of the 
patterns, the state number returned is 0. 

The failure function is called whenever the go_to func- 
tion returns FAIL. Accepting the current state as its input 
parameter, it always returns a state number, the failure 
state transition. 

For the DFSA, the move function accepts the current 
state number and input symbol and always returns the 
next state number. There are no failure state transitions 
in deterministic FSAs. 

Both the NFSA and the DFSA use the output function. 
As defined by Aho and Corasick, this function prints the 
patterns as they are matched by the FSA. However, the 
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if output(state) != NULL then © 
print output(state) - 
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definition of this function can be much more general. In 
fact, the FSA can be implemented in such a way that it 
executes any arbitrary set of procedures whenever it recog- 
nizes a pattern. 

FSAs used by the Aho-Corasick algorithm can be either 
nondeterministic or deterministic. Although a DFSA exe- 
cutes more quickly than its equivalent NFSA, it also re- 
quires more memory to encode its state transition tables. 
Which type you choose for the algorithm depends upon 
the application and the constraints of execution speed and 
memory usage. 

As an example, assume a set of patterns to be matched, 
“the,” “she,” “his,” and “‘hers,’’ with ASCII characters as 
the set-of input symbols. (These have been purloined from 
Aho and Corasick.) The FSAs needed to recognize these 
patterns are shown in Figure 2. Let’s look at the NFSA 
first. Taking as input the string “ushers,” the machine is 
run using Algorithm 1. Starting in State 0, the first sym- 
bol from the string is “u.”” Because only symbols “h”’ and 
“s” lead from State 0 to other states, go_to(0,u) returns 
a, and the NFSA remains in State 0. 

The next symbol from the string is “‘s.”” As shown in 
Figure 2a, the NFSA makes a go_to stake transition to 
State 3. The next symbol (“‘h’’) causes a go_to transition 
to State 4, and the next (“‘e’’) to State 5. An output is 
defined for State 5 (Figure 2c), and the NFSA, having 
recognized two pattern matches, prints “‘she,he.” 

The next character is “r.”” No go_to transitions are 
defined for State 5, so go_to(5,r) returns FAIL. This 
causes failure(5) to return 2 (from Figure 2b), making 
the NFSA perform a failure transition to State 2. From 
here, Algorithm 1 executes go_to(2,r), which causes the 
NFSA to enter State 8. 

Finally, the last input symbol, “s,” leads the NFSA to 
enter terminal State 9, and the output defined for this state 
causes “hers” to be printed. In all, Algorithm 1 recognized 
the patterns “he,” “she,” and “hers” in the string “ushers.” 
The state transitions made can be summarized as: 


us ie rs 
003.43. 2 9 


Input Symbol: 
Current State: 








_ A string of symbols and a pattern-matching mac ine 
consisting of functions move and ie 
it: Matched panne : _ 


a =next symbol in the string 
state = move(state,a) 2  =—e_ 
ok outputistate)!= NULLthen  =——s_—d—sr=s 
print output(state) 
end 
end 
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Now let’s look at the DFSA. Using the same input 
string, “ushers,” this machine makes move state transi- 
tions in accordance with Algorithm 2 and Figure 2d. Its 
state transitions can be summarized as: 


Input Symbol: ush 
Current State: 00 3.4 


The only difference is that the failure transition to State 2 
was skipped. By avoiding any failure transitions, Algo- 
rithm 2 can recognize a pattern in fewer state transitions 
and hence less time than Algorithm 1. 


Software Construction 

Having seen how FSAs work, we will now look at how they 
are built, starting with the computation of the go_to 
function by Algorithm 3 (page 49). 

The go_to function is initially defined to return FAIL 
for every input symbol and every state. Each pattern is 
run through procedure “enter,” which tries to match the 
pattern, symbol by symbol to the existing partially con- 
structed go_to function. When a failure occurs, a new 
state is created and added to the go_to function, using the 
current symbol of the pattern as the input for the state 











ay of patterns {y[1],y[2] . "ig } where ¢ eac 
S a string (0 lone-dimensional array) of syml 
on go_to(s, a) is defined to return FAIL for 
3 ost and all input symbols “a” until define 
wise b dure enter.) 


nction on go_to. and partially computed function 








‘newstate = 0 
aes = 1 tal = do 











FAIL then 


/* “pattern” is an array o 


ure enter(pattern) 
Cs /* “m” symbols */ 


-newstate = newstate + 1 
 output(newstate) = NULL 

_ go_to(state,pattern[p]) = newstate 
_ state = newstate 

it(state) = pattern 


| Algorithm 3 
Computation of go_to Transitions 
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Whether you program on the Macintosh, 
the IBM PC, an Apple II series, a CP/M 
system, or the Commodore 64, your pro- 
“=~ gram will run unchanged on all the rest. If 
“> ™ you write for yourself, MasterFORTH will 
protect your investment. If you 
write for others, it will expand 
your marketplace. 
gd MasterFORTH is a state-of-the-art imple- 
mentation of the Forth computer language. 
Forth is interactive — you have immediate 
™ feedback as you program, every ie of the 
way. Forth is fast, too, and you can use its 7 
built-in macro assembler to make it even 
faster. MasterFORTH’s relocatable utilities, 
transient definitions, and headerless code 
let you pack a lot more program into your memory. y the 
resident debugger lets you decompile, breakpoint, and 
trace your way through most 
CP/M. programming problems. A string 
package, file interface, and 
full screen editor are all standard features. 
MasterFORTH exactly matches the Forth-83 Stan- 
dard dialect described in Mastering Forth by Anderson 
and Tracy (Brady, 1984). The standard package in- 
cludes the book and over 100 pages of supplemen- 
tary documentation. 
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out the source code, db_VISTA is 
available for $395. 


Lattice, Inc. 

P.O. Box 3072 

Glen Ellyn, IL 60138 

Phone: (312) 858-7950 

TWX: 910-291-2190 
“We Practice Portability” 


Benelux: De Vooght. Phone: (32)-2-720.91.28. England: Roundhill, Phone: (0672) 54675. 


Japan: Lifeboat, Inc., Phone: (03) 293-4711. 


Circle no. 36 on reader service card. 





Introducing SMK, the 


| SEIDL MAKE UTILITY” 


use, we couldn't find one that did everything we needed... so we 
wrote SMK. Now we are offering SMK at a fantastic introductory 


Advanced SMK features include: 


When we at S.C.E. neeced an MS-DOS make utility for in-house 
price! 


e Proprietary dependency analysis algorithm analyzes all 
dependencies before rebuilding any files. 


® SMK understands 


complicated dependencies 


involving 


nested include files and source and object code libraries. 


° High-level dependency definition language makes setting 


Supports parameterized macros, 


local variables, constants, include files, command line 
parameters, line and block comments. 


updating is included. 


° FAST! SMK can analyze hundreds of depencendies in just 


seconds. 


e Typeset user’s manual and excellent error diagnostics 
make SMK easy to learn and easy to use. 


Why waste valuable product developmentimaintanance time 
doing work that SMK can do for you? Order SMK today! 


SMK Introductory price, save 40%: $84.00 
SMK List price (effective Jan 86): $140.00 
(include $3.50 postage & handling) 


up dependencies easy. 
e Batch source code editor that allows automatic source file 


Multi-site License 
Dealer Inquires 
Educational Discounts 


Seid! Computer Engineering 
1163 E. Ogden Ave., Suite 705-171 
Naperviile, IL 60540 (312) 983-5477 





Circle no. 114 on reader service card. 


50 


transition. Thereafter, each consecutive symbol of the 
pattern causes a new state to be created and added. 

When the last symbol of each pattern has been pro- 
cessed by procedure “enter,” its associated state is made a 
terminal state. As shown in Algorithm 3, this means that 
the output for the state is defined as the current pattern, 
which Algorithm 1 will print when the NFSA is run. How- 
ever, it is easy to see that you can rewrite the statement 
“output(state) = pattern” in Algorithm 3 to assign what- 
ever procedures to output(state) you want. 

Finally, after all of the patterns have been processed, 
go_to(0,X) is redefined to return 0 for all symbols X that 
still return FAIL. 

When Algorithm 3 completes, it has computed the 
go_to function of the FSA and partially computed the out- 
put function. If you simulate Algorithm 3 by hand with 
“he,” “she,” “his,” and “hers” as its patterns, you will see 
that the output for State 5 will be “she,” not “‘she,he.” It 
remains for Algorithm 4 (page 51) to complete the output 
function as it computes the failure function. 

Let’s define the depth of a state as the number of go_to 
state transitions that must be made from State 0 to reach 
it. For example, the depth of State 4 in Figure 2a is 2, 
while that of State 9 is 4. The failure state transition for 
all states of depth 1 is State 0. The algorithm used to 
compute the failure transitions for all states of depth 
greater than | can be expressed in its simplest form as: 


for each depth D do 
for each state S of depth D-1 do 
for each input symbol A do 
if (T = go_to(S,A)) != FAIL then 


begin 
R = failure(S) 
while go_to(R,A) = = FAIL do 


R = failure(R) 
failure(T) = go_to(R,A) 
end 


To demonstrate this using our example, let’s compute one 
failure transition for a state of depth 2. The states of 
depth | are 1 and 3. The only input symbols for which the 
go_to function does not return FAIL are “e” and “i” for 
State 1 and “th” for State 3. Taking State 3 for “S” and 
symbol “th” for “A” above, we have “T”’ being 4, “R” 
being ‘“‘failure(3)”, which is 0, go_to(0,h) returning 1, 
and finally “failure(4)” being set to go_to(0,h). The fail- 
ure transition for State 4 is thus State 1. 

Algorithm 4 expands on the above algorithm in two 
ways. First, it uses a queue (a first-in, first-out list) to 
maintain the order of states by depth to be processed. 
Second, it accepts as input the output function and com- 
bines the outputs of the terminal states where appropri- 
ate. In our example, the output “he” of State 2 would be 
combined with the output “‘she” of State 5 to produce the 
final and correct “‘she,he”’ output for State 5. 

The ‘“‘move” function is computed from the go_to and 
failure functions by means of Algorithm 5 (page 51). Es- 
sentially, all this algorithm does is precompute all possible 
sequences of failure state transitions. It is similar to Algo- 
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_ begin 

initialize queue _ 

___ for each symbol a do 
me po a 40 











a) = go_to(0,a) 
if (Fr = go_to(0,a)) != O then 
addr totailof queue 
ed 
__ while queue is not empty do 
begin 
__-§ = head of queue 
___ for each symbol a do - 
: = go_to(s,a)) l= FAIL then 

begin — 
 . add t to tail of queue 

__—smovels.aj — ¢ 

end 
else 

- move(s,a) = move(failure(s),a) 
erd 
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rithm 4. Because there is considerable redundancy be- 
tween them, they can be merged to compute the failure 
and move functions concurrently, as is shown in Algo- 
rithm 6 (page 53). 


Details, Details 

So far, the functions go_to, failure, move, and output 
have been shown as something that you assign outputs to 
for specified inputs. This assumes a much higher-level 
programming language than most of today’s offerings. 
Implementing these algorithms in C, Pascal, BASIC, or 
Fortran requires some extra code and work. 

Aho and Corasick programmed their original version in 
Fortran. This is evident from their paper, where they sug- 
gest that the failure and output functions be implemented 
as one-dimensional arrays accessed by state numbers. 
With a language such as C that supports complex data 
structures, the code for the functions can be more elegantly 
written by replacing the state numbers and arrays with 
dynamically allocated structures. Each structure can have 
as members pointers to linked lists of go_to and move tran- 
sitions, a pointer to the appropriate failure transition, and a 
pointer to a character string for the output function. 

Aho and Corasick also note that the go_to and move 
functions could be implemented as two-dimensional ar- 
rays, with the number of states forming one dimension and 


132 bye gl 
cm f 


SST 
(Binnonn00 oy 


the set of input symbols forming the other. However, this 
would require enormous amounts of memory for an ASCII 
character set and several hundred states. Their recommen- 
dation was that the go_to and move transitions for each 
state be implemented as linked linear lists or binary trees. 

Because the FSA will usually spend most of its time in 
State 0 for large input symbol sets, it is advantageous to 
have the go_to or move functions execute as quickly as 
possible for this state. Therefore, as Aho and Corasick 
suggest, a one-dimensional array can be assigned to State 
0. (Note that because no failure transitions are defined 
for State 0, its go_to and move transitions are one and the 
same.) The array is accessed directly, using the input 
symbol as the index, with the corresponding array entry 
being the state transition for that symbol. 

An improvement not covered by Aho and Corasick can 
be made when you realize that several states often will 
have the same move transitions (see Figure 2d as an ex- 
ample). In such cases, the state structures can be assigned 
a common pointer to one linked list of move transitions. 

Some applications may call for the algorithm to be cod- 
ed with predefined patterns in read-only memory Here it 
is usually desirable to maximize the speed of execution 
while minimizing the code size. Aho and Ullman discuss a 
method of encoding the state transition tables that com- 
bines the compactness of linked lists with the speed of di- 
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rect array access. Their method (which Unix’s yace com- 
piler-compiler utility uses to encode its parsing tables) is 


unfortunately too involved to discuss here. Interested read- 


ers are referred to Aho and Ullman’s book for details. 





Putting It All To Work 


Implementing the Aho-Corasick algorithm is fairly 
straightforward, although, as you can see, the code re- 
quired to flesh it out to a full emulation of Unix’s fgrep is 

somewhat involved. If you want to use the algorithm in 
other programs, simply remove the fgrep shell and add 


whatever interface routines you require. 

As an information retrieval utility that searches arbi- 
trary text files, fgrep is useful but by no means complete. 
One helpful extension would be the ability to specify 
Boolean operators (AND, OR, and XOR) for combina- 
tions of patterns. 

Also, rather than simply print matched patterns for its 
output, the FSA can execute whatever procedures you 
choose to associate with the patterns as they are matched. 
From this you could create a macro processor, where the 
FSA accepts an input string, finds matches to predefined 
patterns, substitutes the corresponding macro expansions, 
and emits the result as an output string. 

For those with RAM memory to spare (a megabyte or 


so), consider how fast a spelling checker that makes no © | 
disk accesses beyond initially loading itself could be made 


to run... fifty thousand or more words in RAM and your 
text file is checked almost as fast as it can be read. 


If you come up with an original and fascinating use for — 


the Aho-Corasick algorithm, or if you derive new utilities 
from fgrep, by all means let me know about it. Better yet, 
donate your code to a public domain software group. That 
alone would repay me for developing the code and writing 
this article. 
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if (r = go_to(O,a))!= 0 then 


begin 
add r to tail of queue © 
failure(r) = O- 
end . 
end 


while queue is not empty. do 
begin 
s = head of queue . 
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for each symbol a do 
H(t = go_tols, a)! l= FAIL th 
beqgn = ss 
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Machine readable versions of this program may be purchased for 
$35.00 (U.S.) from byHeart Software. Supported disk formats 
are CP/M 8" SSSD and PC-DOS (v2.x) 5-1/4" DSDD. 


Notes; 


The algorithm used in this program constructs a deterministic 
finite state automaton (FSA) for pattern matching from the sub- 
strings, then uses the FSA to process the text string in one 
pass. The time taken to construct the FSA is proportional to 
the sum of the lengths of the the substrings. The number of 
state transitions made by the FSA in processing the text 

string is independent of the number of substrings. 


Algorithm Source: 
"Efficient String Matching: An Aid to Bibliographic Search" 
Alfred V. Aho & Margaret J. Corasick 

Communications of the ACM 

pp. 333 - 340, Vol. 18 No. 6 (June 


USAGE: 


"io 
fgrep [-vclnhyefxps] [strings] <files> 
where: 


-V 
=¢ 
AL 


All lines but those matching are printed. 


Only a count of the matching lines is printed. 
The names of the files with matching lines are 
listed (once), Separated by newlines, 

Each line is preceded by its line number in the 
file, 

Do not print filename headers with output lines, 
All characters in the file are mapped to upper 
case before matching. (This is the default if the 
string is given in the command line under CP/M, 
as CP/M maps everything on the command line to 
upper case. Use the -f option if you need both 
lower and upper case.) Not a true UNIX "fgrep" 
option (normally available under "grep" only), 
but too useful to leave out. 

<string>. Same as a string argument, but useful 
when the string begins with a '-', 

<file>. The strings (separated by newlines) are 
taken from a file. If several strings are listed 
in the file, then a match is flagged if any of 
the strings are matched, If -f is given, any 
following argument on the command line is taken 
to be a filename. 

Only lines matched in their entirety are printed. 
Each matched line is preceded by the matching 
substring(s). Not a UNIX "fgrep" option, but too 
useful to leave out, 

No output is produced, only status. Used when 
when "fgrep" is run aS a process that returns a 
status value to its parent process. Under CP/M, a 


i) 


-h 
=e 


ae 
-P 
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(Continued on page 56) 
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PUTT TR DE AS 


helps save time, money and cut frustrations. Compare, evaluate, and find products. 





SERVICES 

- Programmer's Referral List - Dealer's inquire 

+ Compare Products > Newsletter 

* Help find a Publisher * Rush Order 

+ Evaluation Literature free - Over 700 products 


- BULLETIN BOARD - 7 PM to 7 AM 617-826-4086 


ARTIFICIAL INTELLIGENCE 


ARITY/PROLOG-full, debug, to ASM&C, 
16 Meg use, windows, strings. 

With compiler $1950. MSDOS $495 
ExperEASE - Expert system tool. 
Develop by describing examples of 
how you decide. PCDOS $625 
ExperLlSP - Interpreter: Common 
LISP syntax, lexical scoping, toolbox, 
graphics. Compiler. 512K MAC $465 
EXSYS - Expert System building 

tool. Full RAM, Probability. Why, 
serious, files PCDOS $275 
GC LISP - “COMMON LISP”, Help. 
tutorial, co-routines, compiled 
functions, thorough. PCDOS Call 
M Prolog - full, rich, separate 

work spaces. MSDOS $725 
PROLOG-86 - Learn fast. Stan- 

dard, tutorials, samples of Natural 
Language. Exp. Sys. MSDOS Call 
TLC LISP - “LISP-machine’-like. 

all RAM, classes, turtle graph., 8087, 
Compiler. 
WALTZ LISP - “FRANZ LISP’ - like, 
611 digits, debugger, large 

programs. CPM80 MSDOS $159 
MicroProlog - improved MSDOS $235 


ACTIVE TRACE, DEBUGGER - 
BASICA, MBASIC, interactive, 
well liked MSDOS §$ 79 


CADSAM FILE SYSTEM-- full ISAM 
in MBASIC source. MSDOS $150 


BASCOM-86 - Microsoft 8086 279 
CB-86 - DRI CPM86,MSDOS 419 
Data Manager - full source MSDOS 325 
InfoREPORTER - multiple PCDOS 115 
Prof. Basic - Interactive, debug PCDOS 89 
TRUE BASIC - ANSI PCDOS 125 


Ask about ISAM, other addons for BASIC 


EDITORS FOR PROGRAMMING 


BRIEF Programmer's Editor - undo, 
windows, reconfig. PCDOS Call 
FirsTime by Spruce - Improve produc- 
tivity. Syntax directed for Pascal ($235) 
or C ($285). 


C Screen with source 86/80 75 
Epsilon - like EMACS PCDOS 195 
PMATE .- powerful 8086 159 
VEDIT - well liked PCDOS 119 
XTC - multitasking PCDOS 95 


efi e 


Microsoft Version II - upgraded. Full 
Lev. II, native, screens. MSDOS $500 


Dig Res-decent MSDOS 525 


Macintosh COBOL - Full. MAC 459 
MBP - Lev Il, native, screen MSDOS 885 
MicroFocus Prof.-full PCDOS call 
Ryan McFarland-portable MSDOS 695 





CPM-86. MSDOS $235. 


C LANGUAGE 


C-terp Interpreter by Gimpel, 
fullK&R, .OBJ and ASM interface. 


8087 MSDOS $255 


INSTANT C - Interactive develop- 
ment - Edit. Source Debug, run. 
EdittoRun-3Secs. MSDOS $445 


“INTRODUCING C’” - Interactive 

C to learn fast. 500 page tutorial. 
examples, graphics PCDOS Call 
Wizard C - Lattice C compatible, full 
sys. III syntax, lint included, fast, 

lib. source. MSDOS $419 


MSDOS C86-8087, reliable Call 
Lattice C - the standard call 


Microsoft C 3.0 - new 259 
RUN/C: - Interpreter 119 
Williams - debugger, fast call 
CPM80 - EcoPlus C-faster, SLR 275 
BDS C - solid value 125 
MEGAMAX C - native Macintosh 

has fast compile, tight code, K&R. 
toolkit, OBJ, DisASM MAC $249 
MACINTOSH Hippo Level 1 109 
Consulair’s MAC C with toolkit 365 


Compare. evaluate. consider other Cs 


C ADDONS 


COMMUNICATIONS by Greenleaf 
($149) or Software horizons ($139) 
includes Modem, interrupts, etc. 
Source. Ask for Greenleaf demo. 


C SHARP Realtime Toolkit-well 
supported, thorough, portable, ob- 
iects, state sys. Source MANY $600 

Cindex + -full B+Tree, vari. length 
field. Source, no royal. MSDOS $259 

abVista FILE SYSTEM - full indexing, 
plus optional record types, pointers. 
Source, no royalties. MSDOS $450 

Faster C Lattice & C86 users elimi- 
nate Link step. Normal 27 seconds. 
Faster C in 13 sec. MSDOS §$ 95 

PC Lint - full C program checking and 
big, small model. All C’s. MSDOS $95 


CHelper: DIFF, xref, more 86/80 135 
CTree - source, no royalties ALL 345 
CURSES by Lattice PCDOS 110 
C Utilities by Essential MSDOS 149 
BC ISAM by Lattice 8086 229 
Greenleaf-200 + , fast. MSDOS 149. 
PHACT-up under UNIX, addons MSDOS 225 
ProScreen - windows PCDOS 275 
Turbo V - Greenleaf C, fast PCDOS 159 
Windows for C - fast, reliable MSDOS 175 


Call for a catalog, literature, and solid value 


800-421-8006 


THE PROGRAMMER’S SHOP™ 


128- Rockland Street, Hanover, MA02339 
Mass: 800-442-8070 or 617-826-7531 985 


Circle no. 97 on reader service card. 


—  __!  \c,"-cc««"--"ll"_W««lc#/n 


Free Literature - Compare Products 


Evaluate products Compare competitors. Learn about new alternatives. One free call 
brings information on just about any programming need Ask for any “Packet” or 
“Addon Packet”: LJ ADA: Modula D2) “Al” COBASIC (°C COCOBOL D Editors 

COFORTH CJFORTRAN C)PASCAL (J UNIX/PC or ()Debuggers. Linkers, etc 












RECENT DISCOVERIES 


LISP-86 - “COMMON” subset, 
tutorial, editor, PP, trace. Best to 
learn. All MSDOS. Only $95 


tLe lec 


MacFORTRAN - full ’77, ’66 option. 
toolbox, debugger, 128K or 512K. 
ASM-out option MAC $349 
RM/Fortran - Full’77. BIG ARRAYS. 
8087, optimize, back trace, 







debug. MSDOS $459 
MS FORTRAN-86 - Improved. MSDOS 239 
DR Fortran-86 - full '77 8086 249 
PolyFORTRAN-XREF, Xtract PCDOS 165 


LANGUAGE LIBRARIES 


MultiHALO Graphics-Multiple video 
boards, printers, rich. Animation, 
engineering business. 

ANY MS language, Lattice, C86 $195, 

for Turbo $95. 

Screen Sculptor - slick, thorough, 
fast. BASIC, PASCAL. PCDOS $115 


GRAPHMATIC - 3D, FTN, PAS PCDOS 125 
File MGNT: BTrieve - all lang. MSDOS 209 
Micro: SUBMATH - FORTRAN full 86/80 250 
MetaWINDOW - icons, cup PCDOS 139 
PANEL - many lang., terminals MSDOS 239 


OTHER LANGUAGES 


ASSEMBLER.-ask about Turbo ASM 
($95), ED/ASM ($95) - both are 

fast, compatible. or MASM 

($125), improvements. 

BetterBASIC all RAM, modules. 
structure. BASICA - like PCDOS $175 


SNOBOL4 + -great for strings, 





patterns. MSDOS §$ 85 
MacASM - full, fast, tools MAC 115 
Assembler & Tools - DRI 8086 149 
PC FORTH - well liked MSDOS 95 


SUPPORT PRODUCTS 


PLINK 86 - a program-independent 


overlay linker to 32 levels for all MS 
languages. C86 and Lattice. $315 
Multilink - Multitasking PCDOS 265 
Pfinish - Profile by routine MSDOS 345 
Polylibrarian - thorough MSDOS_ 95 
PolyMAKE PCDOS 95 
ZAP Communications - VT 100, 

TEK 4010 emulation, full xfer. PCDOS 65 


TEMES 


Periscope Debugger - load after 
“bombs”, symbolic, “Reset Box”, 2 
Screen, own 16K. PCDOS $279 
Advanced Trace 86 Symbolic — PCDOS 149 

Atron Debugger for Lattice, MSFTN PCDOS 369 


Cl Probe for Cb MSDOS 200 
Pfix Plus Debugger MSDOS 315 
TRACE86 debugger ASM MSDOS 115 


Note: All prices subject to change without notice 
Mention this ad. Some prices are specials. 

Ask about COD and POs. All format’s available 
UNIX is a trademark of Bell Labs. 





IN 


ial 
eS 
ee 


semis ele = 
OEE 
Lees eae 
YOUR IBM PC. 


DATA TYPES 
Lists and Symbols 
Unlimited Precision Integers 
Floating Point Numbers 
Character Strings 
Multidimensional Arrays 
Files 

Machine Language Code 


MEMORY MANAGEMENT 


Full Memory Space Supported 
Dynamic Allocation 
Compacting Garbage Collector 


FUNCTION TYPES 
EXPR/FEXPR/ MACRO 
Machine Language Primitives 
Over 190 Primitive Functions 


10 SUPPORT 
Multiple Display Windows 
Cursor Control 

All Function Keys Supported 
Read and Splice Macros 
Disk Files 


POWERFUL ERROR RECOVERY 
8087 SUPPORT 

COLOR GRAPHICS 

LISP LIBRARY 


Structured Programming Macros 
Editor and Formatter 

Package Support 

Debugging Functions 

OBJ File Loader 


M@ RUNS UNDER PC-DOS 1.1 or 2.0 
| 
IQLISP 
54"’ Diskette 
and Manual 



































$175.00 


| q Integral Quality 


PO. Box 31970 
Seattle, Washington 98103-0070 
(206) 527-2918 


Washington State residents add sales tax. 
VISA and MASTERCARD accepted. 
Shipping included for prepaid orders. 
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non-zero value returned by "exit()" may terminate 
a submit file that initiated the program, 
although this is implementation-dependent, 
DIAGNOSTICS: 
Exit status is 0 if any matches are found, 1 if none, 2 for 
error condition, 
BUGS: 
The following UNIX-specific option is not supported: 
-b Each line is preceded by the block number in 
which it was found 
Lines are limited to 256 characters, 
Zs 


/*** Definitions ***/ 


#define TRUE =~] 

#define FALSE 0 

#define MAX_LINE 257 /* Maximum number of characters */ 
/* per line plus NULL delimiter */ 

#define CP/M /* Comment out for compilation */ 
/* under UNIX */ 

#define CMD_ERR 0 /* Error codes */ 

#define OPT_ERR 1 

#define INP_ERR 2 

#define STR _ERR 3 

#define MEM_ERR 4 


/*** Typedefs ***/ 


typedef int BOOL; 


/* Boolean flag */ 


/*** Data Structures ***/ 


/* Queue element */ 


typedef struct queue 
{ 


struct state_el, *st_ptr; 
struct queue *next_el; 


} QUEUE; 


/* Transition element */ 


typedef struct transition 


} 


char lchar; 
struct state_el *nextst_ptr; 
Struct transition *next_el; 
TRANSITION; 


/* Transition character */ 
/* Transition state pointer */ 


/* FSA state element */ 


typedef struct state_el 
{ 


} 


TRANSITION *go_ls; /* Pointer to head of "go" list */ 
TRANSITION *mv_ls; /* Pointer to head of "move" list */ 
struct state_el *fail state; /* "failure" transition state */ 
char *out_str; /* Terminal state message (if any) */ 
FSA; 


/*** Global Variables and Structures ***/ 


/* Dummy "failure" state */ 


FSA FAIL_STATE; 


/ 


+ + + + 


Define a separate data structure for State 0 of the FSA to 
speed processing of the input while the FSA is in that state, 
Since the Aho-Corasick algorithm only defines "go" transitions 
for this state (one for each valid input character) and no 
"failure" transitions or output messages, only an array of 
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* "go" transition state numbers is needed. The array 1s accessed 
* directly, using the input character as the index. 
* 


FSA *MZ[128]; /* State 0 of FSA 


BOOL vflag = FALSE, 
cflag = FALSE, 
lflag = FALSE, 
nflag = FALSE, 
hflag = FALSE, 
yflag = FALSE, 
eflag = FALSE, 
fflag = FALSE, 
xflag = FALSE, 
pflag = FALSE, 
sflag = FALSE; 


/*** Include Files ***/ 
#include <stdio.h> 
#include <ctype.h> 


/*** Main Body of Program ***/ 


int main(argc,argv) 
int argc; 
char **argv; 


char *temp; 

BOOL match_flag 
proc_file() 

void bd_go(), 
bd_move(), 
error(); 


FALSE, 


we ft 


pd 


/* Command-line option flags */ 


/* Check for minimum number of command line arguments */ 


if(arge < 2) 
error (CMD_ERR, NULL) ; 


/* Parse the command line for user-selected options * / 


while(--arge && (*+targv)[0] == 
for(temp = argv[0O]+l; *temp ! 
switch(toupper(*temp) ) 
{ 
case 'V': 
vflag = 
break; 
case 'C': 
cflag = 
break; 
case 'L': 
lflag = 
break; 
case 'N': 
nflag = 
break; 
case 'H': 
hflag = 
break; 
case *Y': 
yflag = 
break; 
case 'E':; 
eflag = 
break; 
case 'F': 
fflag = 
break; 
case 'X': 
xflag = 
break; 
case 'P!': 
pflag = 
break; 
case 'S': 
sflag = 
break; 
default: 
error (OPT_ERR, NULL) ; 


TRUE; 
TRUE; 
TRUE; 
TRUE; 
TRUE; 
TRUE; 
TRUE; 
TRUE; 
TRUE; 
TRUE; 


TRUE; 
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'—' §& eflag == 
"\0'; tempt+) 


FALSE) 


(Continued on next page) 













$49.95 FM T $49.95 


Text Formatting System 





FMT provides most of the features of 
the high-priced Text Formatters at our 
inexpensive price -- and it’s easier to 
use, too! Note the features below: 


e Easily configured to your printer. Con- 
figuration files for 20+ printer models 
are provided or generate your own. 


FMT gets the most from your printers 
by taking advantage of their special 
features, including condensed, double 
width, enhanced, double print, italics, 
elite, letter quality, multiple fonts, etc. 




















Multiple modes and combinations of 
modes can be used on the same line 
or even in the same word. 


FMT works with your favorite editor! 





FMT uses meaningful mneumonic 
commands in the style of SCRIPT or 
ROFF (each command appears on its 
own input line), including commands 
for the various printing modes. 





No embedded control codes - you 
don’t have to remember those strange 
escape/control sequences. 


FMT runs at the maximum speed your 
printer allows for each printing mode 
- graphics mode is not required. 













Standard formatting features provided, 
including headers and footers, 
automatic page numbering, text 
justification, tabs for table generation, 
and embedded files up to TEN deep. 


FMT automatically builds Table of Con- 
tents, List of Figures, and three level 
alphabetized Index. 
















Detailed 100 + page manual profuse- 
ly illustrated with examples. 


e Works equally well with IBM-PC, TI-PC, 
IBM clones and look-alikes (PC- 
DOS/MS-DOS 128k). Also works with 
CP/M 8080 and Z80 systems with 64k. 


$49.95 plus $2.00 shipping and 
handling. 


Specify system. 
VISA and Master Card Accepted 


Dealer Inquiries Welcome 


TINY TEK, INC. 


Route 1, Box 795 
Quinlan, Texas 75474 
(214) 447-3025 





Circle no. 108 on reader service card. 
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} 


/* "pflag" can only be TRUE if the following flags are FALSE */ 
if(vflag == TRUE || cflag == TRUE || lflag == TRUE || 
xflag == TRUE || sflag == TRUE) 
pflag = FALSE; 


for the Apple® ial /* Check for string (or string file) argument * / 
if(largc) 
Fixed point speed can rival that of float- error (CMD_ERR, NULL) ; 
ing point hardware. But the details have aie a 
been a well kept secret—until now. The /* Build the "go" transitions. */ 
following graphs were generated by fixed ; 
point examples from the ISYS FORTH ws ; 
é 


manual. 


/* Build the "failure" and "move" transitions */ 
bd_move (); 

/* Process each of the input files if not "stdin". “*/ 
LE targa... < ::2) 


hflag = TRUE; 
if(largc) 
{ 


if(proc_file(NULL,FALSE) == TRUE && match_flag == FALSE) 
match.flag = TRUE; 
else 
while (argc--) 
Parallel Resonance with Damping if (proc_file(*argv++,TRUE) == TRUE && match_flag == FALSE) 
BASIC 213 sec ISYS FORTH 27 sec match_flag = TRUE; 


/* Return status to the parent process, Status is zero if any 
* matches are found, 1 if none, */ 


if(match_flag == TRUE) 
exit(0); 

else 
exit(l); 


/*** Functions and Procedures ee / 


/* PROC_FILE() - Run the FSA on the input file "in_file", Returns 
* TRUE if a match was found, FALSE otherwise. 


* 
Hydrogen 3p Orbital Cross-section / 


BASIC 492 sec ISYS FORTH 39 sec BOOL proc_file(in_file,prt_flag) 
$$ Char *in_file; 


Fast native code compilation. Sieve rc prt_flag; 


benchmark: 33 sec 


7 ; 
Floating Point—single precision with enee ag aah aga ; pas ee ee r 
trancendentals *index(), 
Graphics—turtle & cartesian with 70- *stoupper(), 
column character set *fgets (); 


Double Precision including D*/ 
DOS 3.3 Files read & written 


oO j * Li * 
PEM een eae pend Rape tee OU, 44 ine courte’ */ 


mtch_cnt OL; /* Matched line counter * / 


Full-Screen Editor BOOL mtch_flag, /* Matched line flag */ 
Formatter for word processing run_fsa(); 


Macro Assembler FILE’ *in-. fda; 
Price: $99, no extra charges *fopen() ; 
void error(); 


if(in_file != NULL) /* A file was specified as the input */ 


ILLYES SYSTEMS 
PO Box 2516, StaA 
Champaign, IL 61820 


if(!(in_fd = fopen(in_file,"r"))) 
error (INP_ERR,in_file); 


; else 
Technical Information: in_fd = stdin; 


217/359-6039, mornings 


For any Apple ] [ model, 48K or larger. 


Apple is a registered trademark of Apple (Continued on page 60) 
Computer. 
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C is the language. 


Lifeboat is the source. 





Productivity Tools from the Leading Publisher of C Programs. 


(eral De mB a I REN ENN eG RE et it ROT EL ARTE EE IEEE ERO ENE EA GETS 
The Lattice® C Compiler 
The cornerstone of a program is its compiler; it 
can make the difference between a good pro- 


gram and a great one. The Lattice C compiler 
features: 


¢ Full compatibility with Kernighan and 
Ritchie’s standards 

e Four memory model options for control and 
versatility 

e Automatic sensing and use of the 8087 math 
chip 

¢ Choose from the widest selection of add-on 
options 

e Renowned for speed and code quality 

e Superior quality documentation 


“Lattice C produces remarkable code. . .the 
documentation sets such a high standard that 
others don’t even come close. . .in the top cat- 
egory for its quick compilation and execution 
time and consistent reliability.” 

Byte Magazine 


Lattice Library source code also available. 


SS 
Language Utilities 

Pfix 86/Pfix 86 Plus — dynamic and symbolic 
debuggers respectively, these provide multi- 
ple-window debugging with breakpointing 
capability. 

Plink 86 — a two-pass overlay linkage editor 
that helps solve memory problems. 

Text Management Utilities — includes GREP 
(searches files for patterns), DIFF (differential 
text file comparator), and more. 

LMK (UNIX “make”) — automates the con- 
struction of large multi-module products. 
Curses — lets you write programs with full 
screen output transportable among all UNIX, 
XENIX and PC-DOS systems without changing 
your source code. 

BASTOC — translates MBASIC or CBASIC 
source code directly to Lattice C source code. 
C Cross Reference Generator — examines your 


Call LIFEBOAT: 1-800-847-7078. In NY, 


| Name 





C source modules and produces a listing of 
each symbol and where it is referenced. 


Editors 


Pmate — a customizable full screen text editor 
featuring its own powerful macro command 
language. 

ES/P for C — C program entry with automatic 
syntax checking and formatting. 

VEDIT — an easy-to-use word processor for 
use with V-PRINT. 

V-PRINT — a print formatting companion for 
VEDIT. 

CVUE — a full-screen editor that offers an 
easy way to use command structure. 

EMACS — a full screen multi window text 
editor. 

Fast/C — speeds up the cycle of edit-compile- 
debug-edit-recompile. 





Graphics and Screen 


Design 


HALO — one of the industry's standard 
graphics development packages. Over 150 
graphics commands including line, arc, box, 
circle and ellipse primitives. The 10 Fontpack 
is also available. 

Panel — a screen formatter and data entry aid. 
Lattice Window — a library of subroutines al- 
lowing design of windows. 





Functions 


C-Food Smorgasbord — a tasty selection of 
utility functions for Lattice C programmers; 
includes a binary coded decimal arithmetic 
package, level 0 I/O functions, a Terminal In- 
dependence Package, and more. 

Float-87 — supports the 8087 math chip to 
boost the speed of floating-point calculations. 
The Greenleaf Functions — a comprehensive 
library of over 200 routines. 

The Greenleaf Comm Library — an easy-to- 





Title 


| Company Nome a Bness Phone 


| Address. 


| Please check one of the following categories: 
[) End User 

Return Coupon to: Lifeboat™ Associates 

1651 Third Avenue, New York, NY 10128 


[] Dealer/ Distributor 





[) Other 


© 1985 Lifeboat Associates 


Circle no. 125 on reader service card. 


1-212-860-0300. 





use asynchronous communications library. 

C Power Packs — sets of functions useful for a 
wide variety of applications. 

BASIC C — This library is a simple bridge 
from IBM BASIC to C. 


Database Record 
Managers 


Phact — a database record manager library of C 
language functions, used in the creation and 
manipulation of large and small databases. 
Btrieve — a sophisticated file management sys- 
tem designed for developing applications under 
PC-DOS. Data can be instantly retrieved by key 
value. 

FABS — a Fast Access Btree Structure function 
library designed for rapid, keyed access to 
data files using multipath structures. 
Autosort — a fast sort/merge utility. 

Lattice dB-C ISAM — a library of C functions 
that enables you to create and access dBase 
format database files. 


Cross-Compilers 


For programmers active in both micro and mini 
environments we provide advanced cross- 
compilers which product Intel 8086 object 
modules. All were developed to be as functional 
— and reliable — as the native compilers. They 
are available for the following systems: 
VAX/VMS, VAX/UNIX, 68K/UNIX-S, 
68K/UNIX-L 
Also, we have available: 
Z80 Cross-Compiler for MS- and PC-DOS — 
produces Z80 object modules in the Microsoft 
relocatable format. 


New Products 


Run/C — finally, a C interpreter for all levels of 
C Programmers. 
C Sprite — a symbolic debugger with break- 
point capability. = 


— 





Aaa 


DD 








gowing ol” 


for C programs to 
compile and link? 





Use C-terp 
the complete C interpreter 


This is the product you've been 
waiting (and waiting) for! 


Increase your productivity and avoid 
agonizing waits. Get instant feedback of 
your C programs for debugging and rapid 
prototyping. Then use your compiler for 
what it does best...compiling efficient code 
.. Slowly. 


C-terp Features 


© Full K&R C (no compromises) 


® Complete built-in screen editor-- 
no half-way house, this editor has every- 
thing you need such as multi-files, inter-file 
move and copy, etc. etc. For the ultimate 
in customization, editor source is available 
for a slight additional charge of $98.00. 


® Fast-- Linking and semi-compilation are 
breath-takingly fast. (From edit to run 
eee in a fraction of a second for 
small programs.) 

¢ Convenient-- Compiling and running are 
only a key-stroke or two away. Errors 
direct you back to the editor with the 
cursor set to the trouble spot. 


e Osiect Module Support — Access functions 
and externals in object modules produced 
by C86 or Lattice C or assembly inate e. 
Utilize your existing libraries cicbenged 

e ae Multiple Module Support-- 
You'll feel in complete control as you 
bounce from module to module, do 
instant global searches, auto-compile 
everything that’s changed, etc. 

¢ Symbolic Debugging-- Set breakpoints, 
single-step, and directly execute 
C expressions. 


¢ Many more features including batch mode 
and 8087 support. 

© Price: $300.00 (Demo $45.00) MC, VISA 
Price of demo includes documentation and shipping 
within U.S. PA residents add 6% sales tax. 
Specify C86 or Lattice version. 

© Cterp runs on the IBM PC (or compatible) under DOS 2.x 


with a suggested minimum of 256Kb of memory. 
It can use all the memory available. 


HIMPEL SOFTWARE 


3207 Hogarth Lane ® Collegeville, PA 19426 
(215) 584-4261 


* Trademarks: C86 (Computer Innovations), Lattice 
(Lattice Inc.), IBM (IBM Corp.),C-terp (Gimpel Software) 
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F, gr €p Lis ting (Listing Continued, text begins on page 46) 


/* Read in a line at a time for processing */ 
while(fgets (buffer,MAX_LINE, in_fd) ) 
{ 


= index(buffer,'\n')) 
Hl = No" 
#ifdef CP/M 
if(fflag == FALSE || yflag == TRUE) 
Stoupper(buffer); 
#else 
if(yflag == TRUE) 
stoupper (buffer) ; 
#endif 
line_cnt++; /* Increment the line counter */ 
if((mtch_flag = run_fsa(buffer)) == TRUE) 
mtch_cnt++; /* Increment matched line counter */ 
if(cflag == FALSE && lflag == FALSE && sflag == FALSE && 
((mtch_flag == TRUE && vflag == FALSE) || 
(mtch_flag == FALSE && vflag == TRUE) )) 


/* Remove newline */ 


if(hflag == FALSE && prt_flag == TRUE) 
printf£("$s: ",in_file); 

if(nflag == TRUE) 
print£("s05id: ",line_cnt); 

puts (buffer); 


} 

if(lflag == TRUE && mtch-cnt > Q) 
printf ("¢s\n",in_file); 

else if(cflag == TRUE && sflag == FALSE) 
printf ("$ld\n",mtch_cnt); 

if(in_file != NULL) 
fclose (in_fd) ; 

if(mtch_cnt) /* Match found */ 

return TRUE; 


else /* No match found */ 
return FALSE; 


/* RUN_FSA() - Run the finite state automaton with String "str" 
* as input. Return TRUE if match, FALSE otherwise. 
ae 


BOOL run_fsa(str) 
register char *str; 


register FSA *st_ptr; 
Char *message = NULL; 
BOOL msg_flag = FALSE; 
FSA *go(), 

*move(); 


Sst_ptr = NULL; 
if(xflag == FALSE) 
{ 


/* Initialize FSA */ 
/* Process the next input character in the String */ 
while (*str) 
st_ptr = move(st_ptr,*str) ; 
/* Print terminal state message and update FSA */ 
if{st ptr =<'"0 “sé message) 
{ 
printf("--> ¢s\n",message) ; 
message = NULL; 
St_ptr = move(st_ptr,*str); 
Str++;3 
if (et < per) 


if (st_ptr->out_str) 


/* Terminal state? */ 
if(pflag == TRUE) 
{ 


/* Save terminal state message */ 


message = st_ptr->out_str; 
msg_flag = TRUE; 
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} 
else 
return TRUE; 
} 
if (message) /* Print any remaining terminal state message */ 
printf£("--> $s\n",message); 
return msg_flag; 


else /* Match exact lines only */ 


while (*str) 
{ 
st_ptr = go(st_ptr, *str++); 
if(!st_ptr || st_ptr == &FAIL_STATE) 
return FALSE; /* Line not matched */ 


return TRUE; 


/* Exact line matched */ 
} 


} 


/* GO() - Process "litchar" and return a pointer to the FSA's 
* corresponding "go" transition state. If the character 
* is not in the FSA state's "go" transition list, then 
* return a pointer to FAIL_STATE. 
ay 


FSA *go(st_ptr,litchar) 
FSA *st_ptr; 
register char litchar; 


{ 
register TRANSITION *current; 
/* If State 0, then access separate State 0 data structure of 
* the FSA. Note that there are no failure states defined for 
* any input to FSA State Q. 
+7 
LE LSE Scr) 
return MZ[litchar]; 
else 
/* Point to the head of the linked list of "go" transitions 
* associated with the state, 
+7 
current = st_ptr->go_l1s; 
/* Transverse the list looking for a match to the input 
* character. 
me 
while (current) 
if (current->lchar == litchar) 
break; 
current = current->next_el; 
} 
/* Null value for "current" indicates end of list was reached 
* without having found match to input character. 
*¥ 
return current ? current->nextst_ptr : &FAIL_STATE; 
} 
} . 
/* MOVE() - Process “litchar" and return a pointer to the FSA's 
* corresponding "move" transition state. 
*7 


FSA *move(st_ptr, litchar) 
FSA *st_ptr; 
register char litchar; 
register TRANSITION *current; 
/* If State 0, then access separate State 0 data structure of 


* the FSA, 
=} 


(Continued on next page) 
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[S-SRUEISESS | 


On October ist, 1985, the pri 

for figFORTH will be increased to \y 
$89.95 © Order NOW and you can have 
the complete figFORTH system for only $74.95 








figFORTH from SOTA Computing Systems 
Limited is rapidly becoming the FORTH of choice 
for both the novice and experienced FORTH 
programmer. Featuring a complete, accurate 
implementation of the figFORTH model, 
figFORTH from SOTA Computing Systems 
Limited also offers: 


e full featured string handling @ 
@ floating point @ 
® screen editor @ 
® assembler @ 
® beginner's tutorial 
® comprehensive programmer s @ 
guide 
e exhaustive reference manual @ 
® unparalleled technical support @ 
@ source listings @ 
@ no licensing requirements @ 
@ no royalty arrangements ® 
® unbeatable price @ 





For the best implementation of 
FORTH that money can buy -- ata 
truly affordable price -- order 
figFORTH from SOTA Computing 
Systems Limited today! 


ORDER FORM 


Gentlemen: I want to save money! 
OEnclosed ismy: Ocheck Omoney-order 


for $74.95 (U.S. Funds). 


OBilimy: OVISA OMastercard 
I have indicated my card number and expiry date below: 


Piease rush me my copy of figFORTH by SOTA for: 


OCP/M Version 2.xx the TRS-80 Computer | 
OCP/M Plus (Ver. 3.xx) have indicated: 


5 1/4" format only - please 
indicate computer type: OModel!l OModel 4 
OModel III OModel 4P 





ZIP: 
EXPIRY: 


eooo000e 





ORDER BY 
ges OO Rt} s: 
BY PHONE 


(G04)688-5009 


State-of-the-Art since 1981 


UE 


ing Systems Limited 


TRS-80 is a registered trademark of Radio Shack 
CP/M and CP/M Pius are registered trademarks of 
Digital Research 


= 
=> 


Dip vay oD e 


Circle no. 100 on reader service card. 
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PROGRAMMER’S UTILITIES 


especially for Turbo Pascal on 
IBM PC/XT/AT and compatibles 


MORE POWERFUL THAN UNIX UTILITIES!!! 








These Ready-to-Use programs fully support Turbo Pascal 
versions 2.0 and 3.0, and PCDOS 2.X and 3.0. Here’s what 
you get: 





Pretty Printer 

Standardize capitalization, indentation; and spacing of 
source code. Don't waste your own time! Several adjustable 
parameters to suit your tastes (works with any standard 
Pascal source). 


Program Structure Analyzer 

Find subtle problems the compiler doesn't: uninitialized and 
unused variables, modified value parameters, “sneaky” 
variable modification, redefined standard identifiers. Also 
generates a complete variable cross reference and an execu- 
tion hierarchy diagram. Interactive or write to file (works 
with any standard Pascal source). 


Execution Timer 

Obtain a summary of time spent in each procedure and 
function of your program, accurate to within 200 micro- 
seconds. Also counts number of calls to each subprogram. 
Fully automatic. 


Execution Profiler 

Obtain a graphic profile of where your program spends its 
time. Interactive, easy-to-use. Identify weak code at the in- 
struction level. (Profiler and Timer for Turbo Pascal Source 
code only.) 


Command Repeater 

Customize any operation by reading and parsing the stan- 
dard input. Send up to 255 keystrokes to any executed pro- 
gram. Automatically generate DOS batch files. 


Pattern Replacer 

Find and REPLACE versatile regular expression patterns in 
any text file. Supports generalized wildcards, nesting, alter- 
nation, tagged words and more. Over a dozen programmer's 
applications included. 


Difference Finder 

Find differences between two text files, and optionally create 
an EDLIN script which rebuilds one from the other. 
Disregard white space, case, arbitrary characters and Pascal 
comments if desired. 


Super Directory 

Replace PCDOS DIR command with extended pattern 
matching, sort capability, hidden file display, date filtering, 
and more. 


File Finder 

Locate files anywhere in the subdirectory tree and access 
them with a single keystroke. Display the subdirectory tree 
graphically. 













































AVAILABLE IN SOURCE 
AND EXECUTABLE FORMAT 


Executable: $55 COMPLETE including tax and shipping. 
Compiled and ready to run, includes 140-page printed user 
manual, reference card and one 5%” DSDD disk. Ideal for 
programmers not using Turbo. NOT copy protected. 


Source: $95 COMPLETE including tax and shipping. 
Includes all of the above, and two additional DSDD disks. 
Disks include complete Turbo Pascal source code, detailed 
programmer's manual (on disk) and several bonus utilities. 
Requires Turbo Pascal 2.0 or 3.0. 

Requirements: PCDOS 2.X or 3.0, 192K RAM — programs 


run in less RAM with reduced capacity. Two drives or hard 
disk recommended. 


TO ORDER: 
VISA/MasterCard orders, call 7 days toll-free 1-800-538-8157 
x830. In California, call 1-800-672-3470 x830 any day. 

Or mail check/money order to: 






















TurboPower Software 
478 W. Hamilton Ave., Suite 196 
Campbell, CA 95008 







For technical questions, call 408-378-3672 






Circle no. 81 on reader service card. 
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F. gr ep Lis t ing (Listing Continued, text begins on page 46) 


if (1st_ptr) 


return MZ[litchar]; 


else 


{ 


/* Point to the head of the linked list of "move" transitions 


* associated with the state, 
+ 
Current = st_ptr->mv_ls; 


/* Transverse the list looking for a match to the input 
* character, 


*7 
while(current) 
{ 
if(current->lchar == litchar) 
break; 
Current = current->next_el; 
} 


/* Null value for "current" indicates end of list was reached 
* without having found match to input character. The 


* returned pointer is then to State 0. 


7 


return Current ? current->nextst_ptr : NULL; 
} 
} 
/* BD_GO() - Build the "go" transitions for each state from the 
* command-line arguments, 
oe 


void bd_go(str) 
Char *str; - 


{ 


register char litchar; 
char *nl, 

buffer [MAX_LINE], 
*stoupper(), 
*fgets(), 
*index(); 
*str_fd, 
*fopen(); 
error(), 

enter(); 


/* Input string buffer */ 


FILE 


void 


/* Initialize FSA State 0 "go" transition array so that every 
* invocation of "go()" with "state" = 0 initially returns a 


* pointer to FAIL_STATE, 
ef 


for (litchar 


= Litchar. <= 127: 
MZ[litchar] 


&FAIL_ STATE; 


BS litchar++t) 


/* If the -f£ option was selected, get the newline-separated 
* strings from the file "str" one at a time and enter them 
* into the FSA. Otherwise, enter the string "str" into the 
* FSA, 


7 
if(fflag == TRUE) 
{ 


if(!(str_fd = fopen(str,"r"))) 
error(STR_ERR,Str); 


while (fgets (buffer,MAX_LINE,str_fd)) 
{ 


if(nl index(buffer,'\n')) 
*¥ni = '\O*; 
if(yflag == TRUE) 
stoupper (buffer); 
enter(buffer); 


/* Remove the newline */ 


fclose (str_fd) ; 
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/* 


* 


+ + + 


x 


ch 
{ 


} 


else 


if(yflag == TRUE) 
stoupper (buffer); 
enter(str); 


/* For every input character that does not lead to a defined 
"go" transition from FSA State 0, set the corresponding 

* element in the State 0 "go" transition array to indicate 

* a "go" transition to State 0. 


my 


for(litchar = 1]; 
if (MZ[litchar] 
MZ[litchar] = 


* 


litchar <= 127; 
== &FAIL_STATE) 
NULL; 


litchar+t) 


ENTER() - Enter a string into the FSA by running each 
character in turn through the current partially- 
built FSA. When a failure occurs, add the remainder 
of the string to the FSA as one new state per 
character. (Note that '\0' can never be a valid 
Character - C uses it to terminate a string.) 

7 
void enter(str) 
ar *str; 
FSA *s, 
*go(), 


*create(); 

TRANSITION *current, 
*insert(); 

char *strsave(); 
register char *temp; 
register FSA *st_ptr = NULL; 
register FSA *nextst_ptr; 
void error(); 


/* Start in FSA State 0 */ 


/* Run each character in turn through partially-built FSA until 
* a failure occurs. 


“y 


temp = str; 


while((s = go(st_ptr,*temp)) != &FAIL_STATE) 


temptt; 
st_ptr = 


} 


/* Process the remainder of the string */ 


S; 


while (*temp) 
{ 


/* If a new state, then create a new state and insert 
* transition character and "go" transition in current 
* state. (Note special case of FSA State 0.) 

f 


if (!st_ptr) 
nextst_ptr = MZ[*tempt++] = 
else if(!(current = 


create(); 
st_ptr->go_ls)) 


nextst_ptr = create(); 
st_ptr->go_1ls = insert(nextst_ptr,*temp+t+) ; 
else 
{ 
/* we. Or it was the character that the FSA returned a 


* "failure" for. Find the tail of the current state's list 
* of "go" transitions, create a new state and append it 
* to the current state's "go" list, 


oe 
while (current->next_el) 


current->next_el; 
create(); 
insert (nextst_ptr,*temptt+) ; 


current = 
nextst_ptr = 
current->next_el = 
st_ptr = nextst_ptr; 


(Continued on next page) 






NEW FEATURES 


(Free update for our early customers!) 
e Edit & Load multiple memory 
resident files. 
e Complete 8087 assembler 
mnemonics. 
;¢ High level 8087 support. 


Full range transcendentals 
(tan, Sin, cos, arctan, 
logs and exponentials) 


Data type conversion and 
1/O formatting. 

e High level interrupt support. 
Execute Forth werds from with- 
in machine code primitives. 

e 80186 Assembler extensions for 
Tandy 2000, etc. 

e Video/Graphics interface for 

Data General Desktop Model 10 


FORTH 


e Fully Optimized & Tested for: 























IBM-PC IBM-XT IBM-JR 
COMPAQ EAGLE-PC-2 
TANDY 2000 CORONA 






LEADING EDGE 


(Identical version runs on almost all 
MSDOS compatibles!) 


e Graphics & Text 
(including windowed scrolling) 


e Music - foreground and 
background 

includes multi-tasking example 
Includes Forth-79 and Forth-83 
File and/or Screen interfaces 
Segment Management Support 
Full megabyte - programs or 
data 


e Complete Assembler 
(interactive, easy to use & learn) 


e Compare 
BYTE Sieve Benchmark jan 83 
HS/FORTH 47sec BASIC 2000 sec 
w/AUTO-OPT 9sec Assembler 5 sec 
other Forths (mostly 64k) 70-140 sec 
FASTEST FORTH SYSTEM 
AVAILABLE. 
TWICE AS FAST AS OTHER 
FULL MEGABYTE FORTHS! 


(TEN TIMES FASTER WHEN USING AUTO-OPT!) 
HS/FORTH, complete system only: $250. 


wee Visa Mastercard cue 


Add $10. shipping and handling 


HARVARD 
SOFTWORKS 


PO Box 69 
Springboro, Ohio 45066 
(513) 748-0390 
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68000 
CO-PROCESSING 
For 

IBM PC, PC/XT 
and 
COMPATIBLE 
SYSTEMS 






Now you can add the MOTOROLA 68000 
16/32 Bit Processor to your PC via use of 
the Pro 68 Advanced Technology Co- 
Processor. Enjoy all of the performance 
benefits of the 68000 processor without 
sacrificing your current PC system. Con- 
sider these impressive standard features 
of Pro 68: 


e High Speed MOTOROLA 68000 micro 
processor 
¢ 10Mhz no wait state design (3 times 
faster than the IBM PC/AT) 
e True 16/32 bit technology 
e For use on IBM PC, PC/ XT or compati- 
ble systems 
e On board 16 bit parity checked memory, 
256K to 1024K 
¢ Two serial |/O ports for multi user 
interface 
e Provisions for the high speed NS32081 
math processor 
e High speed proprietary dual port host 
bus interface 
e Parallel or array processing via multi 
processor architecture 
e MS/PC DOS RAM disk driver program 
e Choice of two popular integrated 16/32 
bit operating systems: 
— CPME68K from Digital Research Inc. 
— Full suite of development tools 
— ‘‘C’’ compiler with floats and 
UNIX 1/0 library 
— Many third party compatible 
languages and applications 
— OS9/6800 from MICROWARE 
Corporation 
— UNIX look alike with multi user/ 
multi tasking, shell, hierarchical 
disk directory, record and file 
lock, pipes and filters 
— Full suite of development tools 
— UNIX V compatible ‘‘C’’ compiler 
— Optional languages include 
BASIC, ISO PASCAL, FORTRAN 
77. 
Pricing from $1195 includes Pro68 with 
256K, OS, and MS/PC DOS RAM disk 
driver. HSC also manufactures and mar- 
kets a full line of co-processors and 
RAM disks for use on Z80 based systems. 


DISTRIBUTORS: 


Australia-Computer Transition Systems 

. . .03-537-2768 
Great Britain-System Science 

.. .01-248-;062 
West Germany-DSC International 

.. .089-723-1125 

Canada Remote Systems 
. . .416-239-2835 


Dealer, Distributor and OEM inquiries 
invited. 





Hallock Systems Co., Inc. 


267 North Main Street 
Herkimer, NY 13350 
(315) 866-7125 
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re § r ep Lis ting (Listing Continued, text begins on page 46) 


/* INSERT() - 
x 


/* Make string terminal state's output message */ 


st_ptr->out_str = strsave(str); 


Create a new "go" transition and return a pointer 
£0. ‘ins 


*/ 


TRANSITION *insert(st_ptr,litchar) 
FSA *st_ptr; 
char litchar; 


{ 


} 


/ 


F 
{ 


} 


/* BD_MOVE() 
* 


TRANSITION *current; 
Char *malloc(); 
void error(); 


if(!i(current = (TRANSITION *)malloc(sizeof (TRANSITION) ) ) ) 
error (MEM_ERR, NULL) ; 


Current->lchar = litchar; 
current->Snextst_ptr = st_ptr; 
current->next_el = NULL; 


return current; 


* CREATE() - Create an FSA state and return a pointer to it. 


wi d 
SA *create() 


FSA *st_ptr; 
char *malloc(); 
void error(); 


if(!(st_ptr = (FSA *)malloc(sizeof (FSA) ))) 
error (MEM_ERR, NULL) ; 


st_ptr->go_ls = st_ptr->mv_ls = NULL; 
st: ptr->fail_state = NULL; 
st_ptr->out_str = NULL; 
return st_ptr; 
- Build the "failure" and "move" transitions for 


each state from the "go" transitions, 


af 


void bd_move() 


register char litchar; 


register FSA *r, /* Temporary FSA state pointers */ 
*s, 
*t; 
FSA *go(), 
*move () ; 
TRANSITION *current, 
*insert(); 
QUEUE *first, /* Pointer to head of queue */ 


*last; > 
void add_queue(), 
delete_queue () ; 


Pointer to tail of queue */ 


last = first = NULL; /* 


For each input character with a "go" transition out of FSA 
* State 0, add a pointer to the "go" state to the queue, Note 


Initialize the queue of FSA states */ 


* that this will also serve as the "move" transition list for 
* State O. 
*7 
for(litchar = 1; litchar <= 127; litchar+t+t) 
if(s = go(NULL, litchar) ) 


add_queue (&first,&last,s) ; 
/* While there are still state pointers in the queue, do ... */ 


while(first) 


(Continued on page 66) 
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PROGRAMMER DEVELOPMENT TOOLS 


TURBO PASCAL AND UTILITIES Ss ee 


Turbo PASCAL by Borland International .... Sale 70 49 
Turbo PASCAL w/8087 or BCD .............. Sale 110 89 
Turbo PASCAL w/8087& BCD ............... Sale 125 99 


Bineve-0y SCONCKAM. iS Pe ib eas ee eke 250 199 

FirsTime for Turbo by Spruce Technology ....... 75 69 

Multi-Halo Graphics by Media Cybernetics ...... 250 199 

Screen Sculptor by Software Bottling .......... 125 109 

Turbo ASYNCH by Blaise Computing ........... 100 89 

Turbo GRAPHICS TOOLBOX by Borland Int’l. .... 55 49 

Turbo POWER TOOLS by Blaise Computing . New 100 89 

Turbo TOOLBOX by Borland Int'l .............. 5D 49 

Turbo TUTOR by Borland Int'l ................. oe 29 

TurboPower Util w/source by TurboPower Sftwr .. . 95 89 

TurboWindow by MetaGraphics ............... 5S 49 

MiG Text Editor by: WeEndIN®. o.2 6 5g. eles ee 99 89 

BASIC LANGUAGE. 

BetterBASIC by Summit Software ............. 200 169 
BOST Maer SUDO.) S580 f cate ok oe Renee 99 89 
Ruretime. Module... : 2.4. seas es Se. 250 239 

Professional BASIC by Morgan Computing ...... 99 89 
BOOST Math Sure: «cee es. gate 62a ee eae 50 47 

True Basic from Addison-Wesley .......... New 150 129 
Prithvi WONG Fs oat ioe ae sy ated oy Woe Fe 500 459 

OTHER LANGUAGES 

8088 Assembler w/Z-80 Translator by 2500 AD ..... 100 89 

BLS PISS BY SIO oie il Pe Cees ks 595 449 

Golden Common LISP by Gold Hill ............. 495 Call 

Janus/ADA by R&R Software ................-.. 900 699 

MASM-86 wiutilities by Microsoft............... 150 109 

Microsoft Fortran........... Links withMSCver3 350 239 

Microsoft Pascal ........... Links with MS Cver3 300 219 

Modula-2/86 by Logitech... .....22. 55... +04. 495 439 

Pocket APL by STSC............ with rebate offer 95 89 


Prolog VMI by Automata Design Associates . New 100 89 
Prolog VML by Automata Design Associates New 300 269 
Prolog VMA by Automata Design Associates New 500 439 








Prolog-86 by Solution Systems ................ 125 Call 
RM/Fortran By Ryan-McFarland ............... 595 439 
APL2C by Lauer Software ..... Interfaces APLtoC 150 139 
Btrieve By Sormcran 0 eR eee es 250 199 
Blaise Tools for Pascal... 0 bs a eck ee Call Call 
FORTRAN Libraries by Alpha Computer Service . Call Call 
Sci Subroutine Lib for Fortran or Basic ........... 175 139 
OTHER PRODUCTS 
Advanced Trace-86 by Morgan Computing ...... 175 149 
Codesmith-86 Debugger’ by Visual Age ......... 145 129 
Polytron Products ........... We Carry a Full Line Call Call 
Profiler by DWB Associates ..........-....+--. 125 89 
Rtrieve by Softcraft . 2.2... ee ee eee 85 79 
Xtrleve Dy Sottctalt:. 0. . fel bea oe eee 195 169 


Periscope Symbolic Debugger 


by Data Base Decisions wae 


Write-protect memory board and breakout switch allows 


instant recovery from runaway code. Provides on-line help, 
windowing, extensive breakpoints, dual monitor support and 
more. 


List Price $295 Our Price $269 








PHOENIX PRODUCTS 
SUMMERTIME SALE! 


In stock and ready for immediate shipping. 


Pasm86 High Performance Macro Assembler........ 295 195 
Pfinish Performance Analyzer .........+0+0++0085 395 269 
Pfix-86 Plus Symbolic Debugger for Plink-86........ 395 269 
Plink-86 Overlay Linker. 2.0086. cee 395 269 
Pmaker Program Development Manager ......------ 195 119 
Pmate Macro Text Editor .........00+ee eee eters 225 145 
ritec: Lint UNH. sie ge Os ee ess er er eee 395 269 


Dealer Inquiries Invited 










a 
had 


136 Sunnyside Street 





Programme 


Hartville, Ohio 44632 


us: 1-800-336-1166 canada; 1-800-225-1166 sco starrer overs snes 
Call For Our Catalog 


Per UeT eS List Ours 


C-terp C Interpreter by Gimpel Software .......... 300 269 
Computer Innovations C-86 Compiler........... 395 299 
DeSmet C Compiler with Debugger ............ 159 145 
Instant C by Rational Systems ............ Sale 500 399 
Lattice C Compiler from Lattice ............... 500 349 
Lattice C from Lifeboat .......... Ltd Qty Special 500 275 
Mark Williams MWC-86 w/Source Debugger . Sale 495 379 
Microsoft C Compiler version3 ............. Sale 395 259 
Wizard C Compiler by Wizard Systems ...... Sale 450 359 
Xenix Development System by SCO ............ 1350 1099 
MACINTOSH C AND UTILITIES 
c-tree by Faircom........... eee aans New version 395 359 
DeSmet/Ouye C Compiler ................ New 150 139 
Mac G by Consulalf 0. oa eG Call for Details Call Call 


Megamax C compiler for Macintosh .........-..+: 295 239 


MICROSOFT C AND UTILITIES 


Microsoft C Compiler version3............. Sale -395 . 2598 
Bisite GC TOG oo ois ai Se ee os gy 3 125 109 
Binisee ta0ls 2.5 os ds eee ees eee 100 89 
C Power Packs from Software Horizons ......... Call Call 
C-terp by Gimpel Software .............-+.-5-. 300 269 
C Utility Library by Essential Software .......... 185-139 
Greenleaf C Functions Library ....... Newversion 185 139 
Greenleaf Comm Library ...............--+--- 185 139 
The HAMMER by OES Systems ............ New 195 179 
Multi-Halo Graphics by Media Cybernetics ...... 250 199 
PANEL Screen Designer by Roundhill ............ 295 234 
Windows for C by Vermont Creative Software .... 195 139 
Basic_C Library by C Source = oe. ee 175 139 
Binise C1606 22 353 ae Ee 125 109 
Sinise © TOOIG 2. hac se tes Foe oe RRS 100 89 
Birlewe by SONGAR Cee ie aes Ege ees 250 199 
C Power Paks From Software Horizons ......... Call Call 
G-tree- by FaitCom 2.2.0.8. New version 395 359 
C Utility Library by Essential Software .......... 185 139 
ESP for C by. Gellesoft. 355... 2 ee. Sale 349 229 
GraphiC by Scientific Endeavors ............... 250 209 
Greenleaf C Functions Library ..... . New Version 185 139 
Greenleaf Comm Library ...............--.---: 185 139 
MetaWINDOWS by Metagraphics ............-- 150 139 
Multi-Halo Graphics by Media Cybernetics ...... 250 199 
PANEL Screen Designer by Roundhill........... 295 234 
PC Lint by Gimpel Software... .... 0.5 eect eee: 100 89 
Scientific Subroutine Lib forC by Peerless ....... 175 139 
Windows For C by Vermont Creative Software... 195 139 













The HAMMER C Library by OES V 
This excellent new C library is designed for creating end-user® 
interfaces. There are functions for creating 123-like menus, 
managing the screen, creating input forms, prompting for 
inputs and more. No royalties and includes source code. 
List Price $195 Our Price $179 


LATTICE PRODUCTS 
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COMPLETE SOURCES 
NO ROYALTIES 


COMPREHENSIVE C Power Packs 
include over 1000 functions which 
provide an integrated environment 
for developing your applications ef- 
ficiently. ‘“This is a beautifully doc- 
umented, incredibly comprehensive 
set of C Function Libraries.”’ 

— Dr. Dobb’s Journal, July 1984 


USEFUL “‘...can be used as an ex- 
Cellent learning tool for beginning C 
Programmers...”’ 

— PC User’s Group of Colorado, Jan. 1985 


FLEXIBLE Most Compilers and all 
Memory Models supported. 


RECOMMENDED ‘“‘| have no hesita- 
tion in recommending it to any pro- 
grammer interested in producing 
more applications code, using more 
of the PC capabilities, in much less 
time.”’ — Microsystems, Oct. 1984 


gy PACK 1: Building Blocks | $149 
DOS, Keyboard, File, 
Printer, Video, Async 


my PACK 2: Database $399 
B-Tree, Virtual Memory, 
Lists, Variable Records 


i PACK 3: Communications $149 
smartmodem™, Xon/Xoff, 
X-Modem, Modem-7 


mm PACK 4: Building Blocks II $149 
Dates, Textwindows, Menus, 
Data Compression, Graphics 


mm PACK 5: Mathematics | $99 
Log, Trig, Random, 
Std Deviation 


my PACK 6: Utilities | $99 
(EXE files) 
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‘Master Card/Visa, $7 Shipping, Mass. Sales Tax 5% 
ASK FOR FREE DEMO DISKETTE 


NOVUM SOFTWARE 
ORGANUM = HORIZONS 
INC. @ inc 


Sie athlete encerinag ep aes ET 
165 Bedford St., Burlington, MA 01803 


(617) 273-4711 
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F. & r Cp Lis ting (Listing Continued, text begins on page 46) 


/* Remove State "r" pointer from the head of the queue, */ 


r = first->st_ptr; 
delete_queue (&first); 


/* Skip (terminal) state with no "go" transitions" */ 


if (!r->go_l1s) 
continue; 


/* Make “move” transition list for terminal state same as its 
>. "go" ‘CFansition tist. 


*/ 


if (r->out_str) 
r->mv_ls = r->go_ls; 


/* For every input to State "r" that has a "go" transition to 
*- State "6° 7 G6. 


*/ 
for(litchar = 1; litchar <= 127; litchar++) 
{ 
if((s = go(r,litchar)) != &FAIL_STATE) 
{ 


/* If a defined "go" transition exists for State "r" on 
. * g . 
* on input "litchar", add a pointer to State "s" to the 


* end of the queue, 
*f 


add_queue (&first,&last,s); 


/* Calculate the "failure" transition of State "s" using 
* the following algorithm, 


yt 


t = r->fail-state; 
while(go(t,litchar) == &FAIL_STATE) 
t = t->fail_state; 
S->fail_state = go(t,litchar); 
} 


else 


/* ...- Otherwise set the pointer to State "s" to a 
* pointer to the precalculated "move" transition of 
* State "r"'s failure state on inpot “lLitchar"™; 


4 4 


s = move (r->fail_state,litchar) ; 


} 


/* Add State "s" as the "move" transition for State "r" on 
* input "litchar" only if it is not State 0 and "r" is not 


* a terminal state, 
re 


if(s && !r->out_str) 
if (!r->mv_ls) /* First instance of the list? */ 
current = r->mv-ls = insert(s,litchar) ; 
else /* No, just another one ... */ 
current = current->next_el = insert(s,litchar) ; 
} 
} 


/* ADD_QUEUE() - Add an instance to the tail of a queue */ 


void add_queue (head_ptr,tail_ptr,st_ptr) 
QUEUE **head_ptr, 

**tail-ptr:; 
FSA *st_ptr; 


QUEUE *pq; 
Char *malloc(); 
void error(); 


/* Allocate the necessary memory and set the variables. */ 


if(!(pq = (QUEUE *) malloc (sizeof (QUEUE) ))) 
error (MEM_ERR,NULL) ; 
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pq->st_ptr = st_ptr; 
pq->next_el = NULL; 


if (!*head_ptr) 
*tail_ptr = *head_ptr = pq; 


else /* No, just another one ... 


*tail_ptr = (*tail-ptr)->next_el = pq; 
} 


/* DELETE_QUEUE() - Delete an instance from the head of queue */ 


void delete_queue (head_ptr) 
QUEUE **head_ptr; 


*head_ptr = (*head_ptr)->next_el; 


/* STRSAVE() - Save a string somewhere in memory */ 


char *strsave(str) 
Char *str; 


int strlen(); 

char *p, 
*malloc(); 

void error(); 


if(p = malloc(strlen(str) + 1)) 
strcpy(p,str); 

else 
error (MEM_ERR, NULL) ; 

Frecurcn: p; 


} 


/* First instance of the queue? */ 


/* STOUPPER() - Map entire string pointed to by "str" to upper 


case, 


“/ 


Char *stoupper(str) 
register char *str; 


register char *temp; 


temp = str; 
while (*temp) 

*tempt++ = toupper(*temp) ; 
return: str- 


} 


{* ERROR() - Error reporting. Returns an exit status of 2 to the 


parent process, 


*/ 
void error(n,str) 
int n; 


char *str;} 


fprintf£(stderr,"\007\n*** ERROR - "); 
Switch(n) 


{ 


case CMD_ERR: 


fprintf£(stderr,"Illegal command line" 3 
break; 
case OPT_ERR: 


fprintf(stderr, "Illegal command line option"); 


break; 
case INP_ERR: 


fprintf(stderr,"Can't open input file %s",str); 


break; 
case STR- ERR: 


fprintf(stderr,"Can't open String file %s",str); 


break; 
case MEM_ERR: 
fprintf(stderr,"Out of memory"); 
break; 
default: 
break; 


} 
fprintf(stderr," ***\n\nUsage: fgrep [-vclnhyefxps]"); 


fprintf(stderr," [strings] <files>\n"); 
exit(2); 
} 


/*** End of FGREP.C ***/ 
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End Listing 
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Bose-Nelson Sort 





by Joe Celko 


68 


into two types: those that pre- 

serve the original sequence of 
the records (also called stable sorts) 
and those that don’t. For example, if 
a stable alphabetic sort is applied 
twice to an address file, first on city 
names then on states, the result will 
be a list ordered by cities within 
states. The same file sorted with a 
non-stable sort would lose the city or- 
dering on the second sort. Although 
the ability to use stable sorts in a se- 
ries makes them look more attractive 
than the non-stable sorts, the non- 
stable sorts are faster. 

All sorting algorithms consist of an 
exchange operation that swaps two 
items in the file or array and puts 
them into sorted order. The number 
of exchanges done by a sort deter- 
mines how fast the sort runs—and 
this number varies with the existing 
order in the input file. 


S orting algorithms can be divided 


ing algorithms known to us. But do we 
know just how well a sort can per- 
form? 

In theory, the fewest number of ex- 
changes required to sort a file of (n) 
items is the ceiling of log2(n!) ex- 
changes. For example, for a file of five 
items, we have log2(5!) = log2(120) 
= 6.9068, which rounds up to seven 
exchanges. The next question is 
whether such algorithms perform 
equally well for different numbers of 
records. 

The answer is mixed: optimal algo- 
rithms exist for some values and not 
for others. No single algorithm seems 
to be minimal for all values. Many of 
the minimal algorithms are highly 
specialized. For example, Dr. H. B. 
Demuth discovered an algorithm for 
sorting five items—and only five—in 
seven exchanges.’ 

Can an algorithm be generalized 
for any fixed number of records and 





No sort algorithm is optimal under all conditions. 
This one is useful when stability is not a consider- 
ation or when parallel processing is possible. 





This gives us a worst-case number 
of exchanges, a best-case number of 
exchanges, and an expected number 
of exchanges. For example, the 
Quicksort algorithm! has a best-case 
time for a file that is already sorted 
(most algorithms do quite well in this 
case) and it has a worst case for a file 
in reverse order. Its expected perfor- 
mance is (n log2(n)) exchanges, where 
(n) is the number of records. This 
makes Quicksort one of the best sort- 


Joe Celko, 8833 Sunset Blvd #304, 
Los Angeles, CA 90069. 


still come pretty close to being opti- 
mal? This question leads us to the 
P-operator discovered by R. C. Bose 
and R. J. Nelson.3 This is a recursively 
defined function that generates ex- 
change pairs for a fixed number of 
items. 

The bad news is that the algorithm 
takes a long time to generate these 
exchange pairs; you really should not 
use it directly to sort a file. The good 
news is that you need generate the 
pairs only once, and you have a very 
good sort for a given number of 
items. An application of this might be 
sorting a poker or bridge hand in a 
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card-playing program. 

The P-operator can be defined as 
ordered tuples of integers with a set 
of transformation rules that are ap- 
plied left to right* The rules appear in 
the Figure (at right) and can be used 
to write a recursive program. The one 
given in Listing One (page 70) is 
credited to Dennis Allison. Another 
approach is to use an explicit stack 
and push quintuples, as shown in 
Listing Two (page 76). This second 
program will run faster due to the re- 
cursive procedure calls and lack of 
printf functions in C. Readers with 
accounts on CompuServe can obtain 
the source code and a short piece of 
documentation for Listing Two by 
accessing [ 70665, 1307]. 

What is happening in this confus- 
ing set of rules is that the original ar- 
ray is divided into two ordered se- 
quences, which are merged into one 
ordered sequence. The two sub- 
sequences, in turn, are ordered by re- 
cursive calls to the same procedure. 
For five terms, the Bose-Nelson 
P-operator program will generate the 
following C program: 


swap(1, 2); 
swap(4, 5); 
swap(3, 5); 
swap(3, 4); 
swap(1, 4); 
swap(1, 3); 
swap(2, 5); 
swap( 2, 4); 
swap(2, 3); 
} 


You can check this program by tak- 
ing five playing cards and dealing 
them face down in a row. Turn over 
cards | and 2; if they are out of order, 
swap them and turn them face down 
again. Repeat this procedure until you 
have made all of the swaps in the pro- 
gram then turn over all of the cards. 
They should be in sorted order now. 

It is worth noting that this pro- 
gram has nine steps and that we al- 
ready know seven is the optimal num- 
ber. So, contrary to earlier beliefs,> 
the Bose- Nelson does not produce op- 
‘timal sorts. (It is left as an exercise 
for the reader to see how well the 


Bose-Nelson sort performs compared | 
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P21. x) => PRI a) P(2 ae PGigitaiee 


P(3, ; 0, }, yh => Null 
> Null 


, Pio. tx. j, 0) = 


PIS. i 


Li y 1) => Pt, 1) 
P(3,i, 1,1, 2) = => PU, 1 G+ TPC.) 
i 2, |, => PCL LPO G41) )) 


Pts i, 
_P3, i, x.j, y) = 


where a= - [x/2] 





(These tuples. should never appear, but one are ‘given for completene 


‘> P(3, i, a, j, b) P(3, (i+a), (x-a), j+b), >) 
PIS, (i+a), (x-a), de ‘b) 


») = ives )/2] if (x is even) 
—_ [y/2Jif (cis od 

oo Figure — 

"Transformation Rules for Ordered Tuples a 
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you buy for $4995? 


You know what your time is worth, but MATIS users 
know that they save long hours everyday in 
developing an attractive and efficient user interface 
for their programs. 





MATIS is a DOS extension consisting of assembler routines with 
the interfaces to BASIC, C, PASCAL, and ASSEMBLER. 


If you think you spend too much time: 


_] Creating Windows L] Defining large Virtual Screens 
|] Formatting Input Fields () Scrollingin four directions 
[|] Setting independent Video Attributes (] Controlling 
Keyboard input at run-time [LJ] Drawing lines and boxes 
LJ] Printing and maintaining your screens. 


Buy yourself a well deserved rest! 
With a copy of MATIS for only *49.95 


MATIS/T™ for Turbo-Pascal only $29.95! 


N EWI Same features as the original MATIS. An 


indispensable add-on at a dynamite price. 


ORDER BY MAIL—WRITE OR CALL FOR COMPLETE DESCRIPTION 
No License Fee 





Softway, Inc. 


500 Sutter Street * Suite 222-J « San Francisco, CA 94102 
(415) 397-4666 


Credit Card Orders Only, Call ’7 days a week, 
24 hours aday (800) 227-2400 Ext. 989 
*ADD $5.00 FOR SHPG CARES. ADD SALES TAX 
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with the optimal values.) However, 
the swap pairs do not depend on the 
previous results, which makes it easy 
to use them for hard-wired sorting 
machines. It also makes it possible to 
use them in parallel processor com- 
puters: in the above five-item sort, 
the calls to swap(1, 2) and swap(4, 5) 
can be done at the same time. 


References 41RIC 1972] Rich, Robert P., Inter- 
| Hoare, C. A. R., “Algorithm 64: nal Sorting Methods Illustrated 
Quicksort,’”” Communications of the with PL/I Programs, Prentice Hall, 


ACM, 4 (1961) p. 321. 1972. 
2 Demuth, H. B., PhD thesis, Stan- | 5 Knuth, Donald, Sorting and 
ford University, 1956, pp. 41-43. Searching, Addison-Wesley, 1973. 


3 Bose and Nelson, “A Sorting Prob- DD} 
lem,’ JACM, Vol. 9 (1962) pp. Reader Ballot 


282-296. Vote for your favorite feature/article. 
Circle Reader Service No. 196. 


Bose -N elson Sor f (Text begins on page 68) 


Listing One 


* Recursive version of Bose-Nelson sort */ 


#include "STDIO.H" 


#include "“atou.c" /* ASCII to unsigned integer */ 


int count = @; 


main (argc, argv) 
int argc; 
char argv[];3 
1 IRE ine 
Lf targe- © 2) 


{ printf ("USAGE: bose n >outfile\n"); 


exit(); 


else 


{n = (atou(*(ap 


= *++argv) =m '-—!'9 apt: ap); 


bosesort (l, n); 
printf ("There were %d swaps\n", count); 


} 

bosesort(i, j) 

tnt, 3 

{ int m; 

LE. (HD 
{m= 1 + (j-1+1)/2 - 1; 

bosesort (i, m):3 
bosesort ((m+l), j); 
bosemerge (i, m, (mt+l), j);3 

} 


bosemerge (il, i2, jl, 


ob. 21, 2, GLa 


j2) 


{ if ((i2 == il) && (j2 == jl)) 
{ printf: ("swap(td, *d)7\n", iiy° 721); 


count += 1; 


} 
else if ((i2 == (i1 + 1)) && (32 == jl)) 
{ printé 6? swapttd, .%d)-\n", i1,.j1)? 
printf ("swap(%d, %*d);\n", i2, j1); 


count += 2; 
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(Continued on page 72) 
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Fatten 
Your Mac 
for $5.00 


Thanks to Macintosh owners 
everywhere, Dr. Dobb’s January 1985 
issue #99 was a runaway best-seller. 


Now, due to popular demand, the 
Doctor has reprinted the sought-after 
Fatten Your Mac article from the sold- 
out January issue. The article explains 
how you can pack a full 512K of 
memory into your system, and save half 
the cost by performing the upgrade 
yourself. 





To order: Enclose $5.00 for each copy 
with this coupon and send to: 
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Computer Language, Feb. 85 Now fully compatible with M80 


in .Z80 mode with many exten- 
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Bose-N elson Sor f (Listing Continued, text begins on page 68) 
Listing One 


} 
else if ((i2 == il) && (32 == (3141)) 
{ print£ ("swap (4d, td) -\n";< il, 42); 
printé..( "swan (ed, td} -\n",- il, j1); 
count += 2; 


else 
{ i.mid = il + (i2-il+l)/2 -1l; 
it’ devyen(i2..© 2141)" 66 (12-7). fees op 2=91)) 
j_mid = jl + (j2-j14+1)/2;3 
else 
j_mid = jl + (j2-j1+1)/2 - 1; 


bosemerge (il, i_mid, jl, j_ mid); 
bosemerge (i_midt+l, i2, j_midt+l, j2):; 
bosemerge (i_mid+tl, i2, jl, j_mid); 


ed 


} End Listing One 


even Cx int Xx; { return (1 eas (i & x))3} (Listing Two begins on page 74) 


SOFTWARE DEVELOPERS 


Save thousands of dollars! Save hundreds of hours! 
by using our assembly language sub-systems 


B-TREE SUB-ROUTINES 
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TURBO EDITASM 






Introducing the first co-resident editor assembler for the IBM PC family. 
TURBO EDITASM (TASM) is significantly faster and easier to use than the IBM 

Macro-Assembler (MASM). Whether you are new to assembly language and want : i 
to quickly write a small assembly language routine, or are an experienced MASM =~ ; es ——s _ 
user tired of waiting months to assemble large files, TURBO EDITASM will bring i 
the excitement back to assembly language. 














TURBO EDITASM |S MUCH FASTER: 


e How fast is TASM? The graph below shows relative assembly times for a 48K 
source file. For large files like this we blow MASM's doors off at 3 times their 
speed. For smaller 8K files we positively vaporize them at 6 times their speed. 


TASM (110 sec.) 
MASM (340 sec.) 


e TURBO EDITASM is faster for the following reasons: (1) Written entirely in 
assembly language (unlike MASM). (2) Editor, assembler and source file always in 
memory so you can go instantly from editing to assembling and back. (3) Elimi- 
nates the time needed to LINK programs. Executable COM files can be created 
directly. (Also creates OBJ files compatible with the IBM linker). 


TURBO EDITASM IS EASIER TO USE: q s : 


TASM includes many other features to make your programming simpler. 





















Gear 


High speed random and sequenti 
Multiple keys per data file with u 




























°~Combines ‘ease’ of use of database*ma 

ming language. 
Supports multi_key. files and dy 
e Very easy to use. 


e Listings are sent directly to screen or printer. Assemblies can be single stepped 


and examined without having to leave the editor. : | : | | 








x definition... 





e Access the built-in cross reference utility from the editor. 











e Full support of 186 and 286 (real mode) instructions. 


e Both Microsoft and 8087 floating point formats are supported. 8087 and 287 a a Make oe ie Sa Ge 
instructions supported directly without macros for faster assembly. : :, . : : 


e Calculator mode: Do math in any radix even using symbols from the symbol table. 
e Direct to memory assembly feature lets you test execute your code from editor. 









¢ Coming soon: A coordinated symbolic debugger. 


COMPATIBILITY: TASM is source code compatible with MASM and supports 
macros, records and structures. 




















“For more information cail or 


3 Stan 


Include $5.00 shipping and 
handling. California residents 


Introductory Price $49 add 6% Sales Tax. 


With .OBJ Capability $99 Dealer inquires welcome 
916-988-7426 


Speedware™ 118 Buck Circle, Box D “i 
















Folsom, CA 95630 
Microsoft trademarks of IBM Corp., 





IBM, Microsoft Corp. 





Credit cards accepted. | | Dealer inquiries invited. 
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Time and Money. 


We've just done something we know you'll like. Battery Backup, Too 
We've made the SemiDisk far more affordable than 


ever before. With price cuts over 25% for most of 
our product line. Even our new 2 megabyte units 
are included. 


At 0.7 amps per 2 megabytes, SemiDisk consumes 
far less power than the competition. And you don't 
have to worry if the lights go out. The battery 
backup option gives you 5-10 hours of data 

It’s Expandable protection during a blackout. Nobody else has this 


important feature. Why risk valuable data? 
SemiDisk Systems builds fast disk emulators for ae 


more microcomputers than anyone else. S-100, The Best News 


IBM-PC, Epson QX-10, TRS-80 Models II, 12, and 16. 512K 1Mbyte 2Mbyte 
You can start with as little as 512K bytes, and later — gemiDisk I, S-100 $695 $1395 

upgrade to 2 megabytes per board...at your own SemiDisk II, S-100 $995 $1995 
pace, as your needs expand. Up to 8 megabytes per = [BM PC, XT, AT $595 $1795 
computer, using only four bus slots, max! Software  Qx-10 $595 $1795 
drivers are available for CP/M 80, MS-DOS, ZDOS,  TRs-80 I, 12, 16 $695 $1795 
TurboDOS, VALDOCS 2, and Cromix. SemiDisk Battery Backup Unit $150 $150 $150 


turns good computers into great computers. 


Someday you'll get a SemiDisk. 


Sea iIDi SK Until then, you'll just have to....wait. 
= 


SemiDisk Systems, Inc., P.O. Box GG, Beaverton, Oregon 97075 503-642-3100 
Call $03-646-5510 for CBBS'NW, 503-775-4838 for CBBS/PCS, and 503-649-8327 for CBBS/Aloha, all SemiDisk equipped computer bulletin boards ( 300/1200 baud) SemiDisk, SemiSpool trademarks of SemiDisk Systems. 
Circle no. 85 on reader service card. 
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Bose -N elson Sor f (Listing Continued, text begins on page 68) 
Listing Two 


/* non-recursive version of Bose-Nelson sort */ 
#include "STDIO.H" 

#include "atou.c" /* ASCII to unsigned integer */ 
#define MAXSTACK 2508 /* pick a high number */ 


int count = @; 
int top = @; 
int stack [MAXSTACK] ; 


main (argc, argv) 
int: aroc: 
char argv[]; 
f int. ne 
LE (aAEGC. «23 
{ printf ("USAGE: bose n >outfile\n"); 
exit(); 


else 
{n = (atou(*(ap = *+ttargv) == '-'? aptl: ap); 
bosesort (n); 
printf ("There were %d swaps\n", count); 


bosesort(n) 
int n; 
{ int a, D> 1s 44 X, YV3 
printé: ("f\n"); 
push5 (2,1,n,8,98); 
while (top >@) 
oo (stack [top] ) 


case 6: { printf("}\n"); 
top = @; 


break; 


case 1: { printf ("swap(%d,%d);\n", stack[top-l], stack[top-2]); 


top -= 3; 
count++: 
break; 


case 2: { : stack [top-l]; 
stack [top-2]; 
/* cheese two variables are defined for easy reading */ 
Lop = 33 
££ bX Te ob) 
{oa = (2/2) | 
pushs (3, 4, a, =i tat, -teea))? 
push3(2, (ita), (x-a)); 
pusns (2,1, a}? 


(Continued on page 76) 


74 


Dr. Dobb's Journal, September 1985 


ALL SALES ARE MADE SUBJECT TO THE TERMS OF OUR 90 DAY LIMITED WAL ~A COPY OF THIS WARRANTY IS AVAILABLE FREE, ON REQUEST. 


DIGITAL RESEARCH COMPUTERS 
LAP 


64K $100 STATIC a 
Switching Power Supply! $119°° guesses 






















+ 5VDC - 8 Amps 

+12VDC - 5 Amps 

-12VDC - 1 Amp 
(81 WATTS MAX) 


"29% at 



























LOW POWER! 
150 NS ADD $10 













BLANK PC BOARD 
WITH DOCUMENTATION 
$49.95 


SUPPORT ICs + CAPS 


Seta 


Features: PRICE CUT! 


Uses new 2K x 8 (TMM 2016 or HM 6116) RAMs. 
$17.50 * Fully supports IEEE 696 24 BIT Extended 
2 Addressing. 


FULL SOCKET SET * 64K draws only approximately 500 MA. 
* 200 NS RAMs are standard. (TOSHIBA makes 



























$14.50 TMM 2016s as fast as 100 NS. FOR YOUR HIGH 
BRAND NEW UNITS, MFG. BY BOSCHERT FOR HEWLETT FULLY SUPPORTS THE’; Zuppoare pauaNrom 
PACKARD! PERFECT FOR SMALL COMPUTER AND DISK NEW IEEE 696 S100 ANDENTIREBOARD), 
DRIVE APPLICATIONS #XL81-5630. INPUT 110V/220V, STANDARD + 2716 EPROMs may be installed in any of top 48K. 
50/60 HZ. NOMINAL OUTPUTS: +5VDC @ 8A, +12VDC @5A, (AS PROPOSED)” De’aisabied to provide windows to, oliminaie 
-12VDC @ 1A. TOTAL MAX OUTPUT. MUST BE LIMITED TO FOR 56K KIT $105 _—any possible conflicts with your system monitor, 


: disk controller, etc. 
ASSEMBLED AND * Perfect for small systems since BOTH RAM and 
TESTED ADD $50] . BOARD may be parialy populsted se SK 
64K SS-50 STATIC RAM 
99%.) 
o# (48K KIT) 











81 WATTS TOTAL! (WITH PIN OUT SHEET.) ORIGINAL 
FACTORY BOXED. 


256K S-100 SOLID STATE DISK SIMULATOR! 

WE CALL THIS BOARD THE “LIGHT-SPEED- 100” BECAUSE IT OFFERS 

AN ASTOUNDING INCREASE IN YOUR COMPUTER'S PERFORMANCE 

WHEN COMPARED TO A MECHANICAL FLOPPY DISK DRIVE. 
FEATURES: 


PRICE CUT! 256K on board. using + 5V 64K 
Bs DRAMS. 


* Uses new Intel 8203-1 LSI Memory 
Controller. 

* Requires only 4 Dip Switch Selectable 
1/O Ports. 

* Runs on 8080 or Z80 S100 machines. 

* Up to 8 LS-100 boards can be run 
together for 2 Meg. of On Line Solid 
State Disk Storage. 

* Provisions for Battery back-up. 

* Software to mate the LS-100 to your 
CP/M* 2.2 DOS is supplied. 

* The LS-100 provides an increase in 
speed of up to 7 to 10 times on Disk 
intensive Software. 

















t 



























LOW POWER! 
RAM OR EPROM! es 


FEATURES: 
ae ee x Uses new 2K x 8 (TMM 2016 or HM 6116) RAMs. 


Fully supports Extended Addressing. 
64K draws only approximately 500 MA. 























DOCUMENTATION 
$52 200 NS RAMs are standard. (TOSHIBA makes 


TMM 2016s as fast as 100 NS. FOR YOUR HIGH 


SUPPORT ICs + CAPS SPEED APPLICATIONS.) 
* Board is configured as 3-16K blocks and 8-2K 


* + © 















































BLANK PCB * co teeienes oo ya eet $18.00 blocks (within any 64K block) for maximum 
aa ae Ree kg Sec boards. FULL SOCKET SET * 2716 EPROMS may be installed anywhere on 
$15.00 Board. 
PROGRAM ON DISKETTE) $ 00 * Top 16K may be disabled in 2K blocks to avoid 
$6995 (ADD $50 FOR A&T) 56K KIT $109 any \/O conflicts. 
: * One Board supports both RAM and EPROM. 
(8203-1 INTEL $29.95) #LS-100 (FULL 256K KIT) 64K KIT $119 * RAM supports 2MHZ operation at no extra 






| plese nb | * Board may be partially populated in 16K 
32K $100 EPROM/STATIC RAM 


FOUR FUNCTION BOARD! 


EPROM Il 
FULL 


THE NEW ZRT-80 
CRT TERMINAL BOARD! 


A LOW COST Z-80 BASED SINGLE BOARD THAT ONLY NEEDS AN 
ASCII KEYBOARD, POWER SUPPLY, AND VIDEO MONITOR TOMAKEA 
COMPLETE CRT TERMINAL. USE AS A COMPUTER CONSOLE, OR 
WITH A MODEM FOR USE WITH ANY OF THE PHONE-LINE COMPUTER 
SERVICES. pees pre 


FEATURES: 
* Uses a Z80A and 6845 CRT 
Controller for powerful video 












BLANK 


PC BOARD 
WITH DATA 
$39.95 









EPROM KIT 
$69.95 


SUPPORT 





capabilities. IC's 
* RS232 at 16 BAUD Rates from 75 A&T EPROM PLUS CAPS 
to 19,200. aS ssaaanameati att Re $16 
* 24x 80 standard format (60 Hz). Te ea ey ‘ 
We took our very popular 32K S100 EPROM Card and added FULL 


* Optional formats from 24 x 80 
(50 Hz) to 64 lines x 96 characters 
(60 Hz). 

* Higher density formats require up to 
3 additional 2K x 8 6116 RAMS. 

* Uses N.S. INS 8250 BAUD Rate Gen. 
and USART combo IC. 

* 3 Terminal Emulation Modes which 
are Dip Switch selectable. These 

include the LSI-ADM3A, the Heath $ 8 GQ 95 

H-19, and the Beehive. 

Composite or Split Video. #ZRT-80 

Any polarity of video or sync. (COMPLETE KIT, 2K VIDEO RAM) 

Inverse Video Capability. , 

Small Size: 6.5 x 9 inches. 

* Upper & lower case with descenders. 

* 7x 9 Character Matrix. 

* Requires Par. ASCII keyboard. 


FOR 8 IN. SOURCE DISK 
(CP/M COMPATIBLE) 
ADD $10 


Digital Research Computers 


P.O. BOX 461565 » GARLAND, TEXAS 75046 - (214) 225-2309 


SOCKET SET 


additional logic to create a more versatile EPROM/RAM Board. $15 













FEATURES: * This one board can be used in any one of four ways: 

A. As a 32K 2716 EPROM Board 

B. As a 32K 2732 EPROM Board (Using Every Other Socket) 
C. AS a mixed 32K 2716 EPROM/2K x 8 RAM Board 

D. As a 32K Static RAM Board 

Uses New 2K x 8 (TMM2016 or HM6116) RAM's 

Fully Supports IEEE 696 Buss Standard (As Proposed) 
Supporis 24 Bit Extended Adressing 

200 NS (FAST!) RAM'S are standard on the RAM Kit 
Supports both Cromemco and North Star Bank Select 
Supports Phantom 

On Board wait State Generator 

Every 2K Block may be disabled 

Addressed as two separate 16K Blocks on any 64K Boundary 
Perfect for MP/M* Systems 

RAM Kit is very low power (300 MA typical) 


32K STATIC RAM KIT — $99.95 


For RAM Kit A&T — Add $40 : 8 a ee 


TERMS: Add $3.00 postage. Orders under $15 add 75¢ handling. No 
C.O.D. We accept Visa and MasterCharge. Tex. Res. add 5-1/8% Tax. 
Foreign orders (except Canada) add 20% P & H. Orders over $50 add 85¢ 
for insurance. 












BLANK PCB WITH 2716 
CHAR. ROM. 2732 MON. ROM 


$4995 
SOURCE DISKETTE - ADD $10 
SET OF 2 CRYSTALS - ADD $7.50 


* + 










*eeee et + + + © 


y WE ARE NOT ASSOCIATED WITH DIGITAL RESEARCH INC. (CALIF.) THE SUPPLIERS OF CPM SOFTWARE 
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Bose-Nelson Sort 


Listing Two 


} 
break; 
case 3: { i = stack[top-l]; 
x = stack[top-2]; 
J} = stack[top-3]; 
x = stack[top-4]; 


/* these four variables are defined for easy reading */ 


y 


a= (x/2); 
if (even(x)) 
b = (y+1)/2;3 
else 
b= (y/2); 
top -= 5; 
if ((x == 1) && (y == 1)) 
prens tle, 3): 
else if ((x == 1) && (y == 2)) 
{-push3s tl, i, 4) 
push3(l, i, (j+1)); 


else if ((x == 2) && (y == 1)) 
{ push3 (1, €i4+1),°4)3 
pusbi(t,: bey)? 
else { push5(3, (ita), (x-a), j, b); 
push5(3, (ita), (x-a), (j+b), (y-b)); 
pushs(3, i, a, :4; b+ 


3 
break; 


default: 


{ printf ("FATAL: Error in stack\n"); 


exit(); 


break; 
} /* end of while loop */ 
}/* end of main */ 


even (x) 
int x; 


{ return (1 - (1 & x))3} 


push3(a, b, c) 


int oS, 5, <3 


{ stack[++top] 
stack [++top] 
stack [++top] 


Ge 
b; 
az 


a ae 


if (top > MAXSTACK) 
{ printf ("FATAL: stack overflow at %d\n", top); 
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exit (); 


push5 (a, b,c; -d, ¢) 

Ine. 2» °D,y.-6F 

{ stack[++top] = e; 
stack[++top] = d; 
stack[++top] = c; 
stack[++top] = b; 
stack[++top] = a; 
if (top > MAXSTACK) 


{ printf ("FATAL: stack overflow at %d\n", top); 


exit(); 





Now available with 
8087 Support! 


MTBASIC 


Basic Compiler 








Features: 
Multi-line functions Multitasking 
No runtime fee Windowing 
Handles interrupts Interactive 
Fast native code Compiles in seconds 
MTBASIC is easy to use since you can write programs in an inter- 
active environment and then compile them using only one com- 
mand. MTBASIC has many advanced features like multitasking, 


random file access, formatted I/O, assembly language calls, and 
ROMable code. 


The MTBASIC package includes all the necessary software to 
run in interpreter or compiler mode, an installation program (so 
any system Can use windows), demonstration programs, and a 
comprehensive manual. 










Ordering 


MTBASIC is available for CP/M, MS-DOS, and PC-DOS systems 
for $49.95.MTBASIC with 8087 support is available for MS-DOS 
for $79.95. Shipping is $3.50 ($10.00 overseas). MD residents 
add 5% sales tax. MC, Visa, checks and COD accepted. 


SOFIAID, Inc. 
















301/792-8096 
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P.O. Box 2412 Columbia,MD 21045-1412 


End Listings 





DE Smet C 


8086/8088 Development Package 


$109 


FULL DEVELOPMENT PACKAGE 


@ Full K&R C Compiler 

e@ Assembler, Linker & Librarian 

@ Full Screen Editor 

@ Execution Profiler 

@ Complete STDIO Library (>120 Func) 


Automatic DOS 1.X/2.X SUPPORT 
BOTH 8087 & S/W FLOATING POINT 
OVERLAYS 


OUTSTANDING PERFORMANCE 


@ First and Second in AUG ’83 BYTE 
benchmarks 













SYMBOLIC DEBUGGER $50 














@ Examine & change variables by name 
using C expressions 

@ Flip between debug and display screen 

@ Display C source during execution 

@ Set multiple breakpoints by function or line 
number 

















DOS LINK SUPPORT 


930 


e Converts DeSmet.0 to DOS.OBJ Format 
e LINKs with DOS ASM 
e Uses Lattice® naming conventions 


WARE 


CORPORATION 


P.O. Box C, Sunnyvale, CA 94087 
(408) 720-9696 
Street Address: 505 W. Olive, #767 (94086) Call for hrs. 


All orders shipped UPS surface on IBM format disks. Shipping included in price. California 
residents add sales tax. Canada shipping add $5, elsewhere add $15. Checks must be on U.S. 
Bank and in U.S. Dollars. Call 9am—1pm to CHARGE by VISA/MC/AMEX. 


Foreign Distributors: AFRICA, HI-TECH SVCS, Gaborone 4540 or Telex 2205BD LANGER e 
ENGLAND: MLH Tech, 0606-891146 e JAPAN: JSE 03-486-7151 @ 
SWEDEN: ESCORT DATA 08-87 41 48 or THESEUS KONSULT 08-23 61 60 
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Who Says You 
Can’t Tell 
A Book By 
Its Cover? 














Dr. Dobb’s Sourcebook: 
A Reference Guide 


for the C Programming 
Language 


For years, serious programmers have relied on Dr. Dobb’s Journal for the technical tools of - 
their trade. Now, Dr. Dobb’s presents the definitive programmers guide to the who, What, 
where, when and why of C, the leading language among software developers. This _— 
comprehensive guide to new information, products and services speciictoC willbe most =~ 
often-used reference! | _ 





In this valuable guide you'll find: 


e An extensive directory of hardware * A comprehensive C product 
and software services—including _ listing including C compilers, 
classes and seminars, C graphics modules, utilities, editors 
- programming opportunities,andon- —_ and development systems, and more! 
eos - ~eAnd much more practical C 
e A bibliography with over 300 programming information 
listings of available articles and  . 
books on C — 


At only $7.95, no C programmer can afford to be without this unique reference. 





TO ORDER: Mail this coupon, along with payment, to: Dr. Dobb’s Journal, 2464 Embarcadero Way, Palo Alto, CA 94303 











PAYMENT MUST ACCOMPANY YOUR ORDER Please send me _______ copies of Dr. Dobb’s Sourcebook 
I enclose check /money order 

_______ Please charge my __ VISA __M/C —_ American Express at $7.95 each = a 
a i ee exp. Date 

; + Shipping & Handling =:22 oe 
S PR eas ea ee ee ee eo : 

BATS (Must be included with order. Please add $1.50 per book in 
Name Se eo ee a Males See A lS Se U.S. $3.25 each surface mail outside U.S. Foreign airmail 
‘Adis rates available on request. ) 
Ey ack tee ae A aid aa et cee TOTAL = 

3107 
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Turbo Pascal and C Programmers 


The most comprehensive screen management and display system 
on the market, bar none, now speaks Turbo and C. 

S3-Screen is a post-processor for IBM’s Application Display 
Management System. (IBM’s PC-DOS languages, BASIC, 
PASCAL, COBOL, FORTRAN, and Assembler, already inter- 
face with ADMS.) ADMS is available at most stores that sell 
IBM products. (Ask where to obtain discounts.) 


Full keyboard editing features 
Mono and graphics display support 
Time & date (dynamic) display option 
NumLock, CapsLock, and Scroll status display 
Colors, highlighting, blinking, and reverse video 
Validity check, multiple ranges & values per field 
Exception messages, for both value and type errors 
40 function and 20 interrupt keys per screen 
128 fields per screen, 30 screens per file 
Error return at field or screen level 
Global character validation 

S3-Screen generates ADMS linkage for Turbo or C by writing 
two source files—an INCLUDE file, and a main program (very 
small, about 20 lines) to which you add application code. The 
source generated by S3-Screen can be compiled ‘‘as is’’ to cycle 
through all screens. The interface is friendly and complete. One 
FUNCTION call clears or displays the screen of your choosing. 
Screen input is accessible by record, or by individual variable, 
via the field name assigned in ADMS. 

There is no contender for ease of use, field validation power, 
and professional screen presentation. Also, once designed, the 
screens are available for use by many different languages. 

S3-Screen is $29.95. Master Card is accepted. 

Social & Scientific Systems, Inc. 
Attention: $3-Screen 

7101 Wisconsin Avenue, Suite 610 
Bethesda, Md. 20814 


301-986-4870 
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If you're a C programmer (or want to be one), we 
speak your language. Subscribe to The C Journal 
today, and start increasing your productivity right 
away. We give you information you can use on any 
machine — IBM PC™, UNIX™-based, Macintosh™, or 
CP/M™ — micro, mini, or mainframe. 


e in-depth reviews and feature articles — C com- 
pilers, editors, interpreters, function libraries, 
and books. 


e hints and tips — help you work better and 
faster. 

e interviews — with software entrepreneurs that 
made it — by using C. 


@ news and rumors — from the ANSI standards 
committee and the industry. 


Limited Time Offer 


Join our thousands of subscribers at the Discount 
Rate of only $18 for a full year (regularly $28)! Call 
us now at (201) 989-0570 for faster service — don't 
miss a single issue of The C Journal! 


Please add $9 for overseas airmail. 
Trademarks — CP/M: Digital Research Inc. IBM PC: IBM 


Corp. Macintosh: AppleComputerCorp. TheC Journal: 
InfoPro Systems. UNIX: AT&T Bell Labs. 


Tite) cee A TT 
cel: Lele law e) 

Denville, NJ 07834 

(201) 989-0570 
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You Read Dr.Dobb's journal 


And You Don’t Subscribe?! 


save over $23.00 off newsstand prices for 2 yrs. 
save over $10.00 for 4 yr. 


Can you afford to miss an issue with information vital to your interests? As a subscriber 
you can look forward to articles on Small-C, FORTH, CP/M. 5-100, Compiler optimiza- 


tion, Concurrent Programming and more, delivered right to your door. And you'll 
never miss the issue that covers your project. 


_____ | enclose a check/money order 


Yes! Sign me up for Charge my Visa, MasterCard, 


2 yrs. $47 = ts VE SES American Express 
____ Please bill me later 
Name Latin pa pa a hy Sait Pe ee ES a YP 
Address 


pra a Per tint len ee ge ie cs we at NL te hae Pa ee 8, S 
mat ate ac a ee aaa ES aks ge dt On Joan Seog 
a es: Ae 

Credit Card Exp. date 


Account No. Spite esi eles ER Oe ee AS ca i oh ee Rk ae 
Signature 


a enh end hal a ace Bes tea L gk es NE Be Te ee Mee be ity 
Please allow 6-9 weeks for delivery. 3045 











Two. TEX Implementations 
for the IBM PC 


Richard Furuta and 
Pierre A. MacKay 
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“An experienced system program- 
mer, who wants to provide the best 
possible documentation of his or her 
software products, needs two things 
simultaneously: a language like TX 
for formatting, and a language like 
Pascal for programming.” —Donald 
Knuth, The WEB System of Struc- 
tured Documentation. 

TeX, as many readers will know, 
is Donald Knuth’s system for type- 
setting technical text. The name is 
based on the Greek root in the word 
‘technical’; it is in no way associ- 
ated with the state of Texas, and 
only remotely associated even with 
the word ‘text’. The shibboleth of 
the true convert is the pronuncia- 
tion of the final letter, which should 
sound rather like the ‘ch’ at the end 
of the name of J. S. Bach. The offi- 
cial derivation is from tékhné=‘art’ 
or ‘craft’. 


process of working out this specific 
problem, Knuth supplied just about 
every need that could be imagined 
for text typesetting. There are cer- 
tain things TrX does not do; it has 
no built in graphics capabilities, and 
it does not provide for arbitrary ro- 
tations of characters and lines, but it 
should be noted that there are very 
few digital phototypesetters which 
could make use of such capacities 
even if they were offered. There 
are good general mechanisms within 
TeX which may someday be used 
to supply some of these special re- 
finements if the output devices for 
them become readily available. For 
now, TX offers precisely what Don 
Knuth claims for it in the preface 
to the TXbook, “a system intended 
for the creation of beautiful books.” 
TeX will be used, and is being used 
for everything from two-line busi- 





A system intended for the creation of 
beautiful books. 





Knuth is a Professor of Computer 
Science at Stanford University and 
is best known for his ongoing se- 
ries of books collectively entitled 
The Art of Computer Programming, 
perhaps the most important central 
reference source in Computer Sci- 
ence. TeX grew out of the need for 
a typesetting program that could be 
used to prepare new volumes in the 
series—in particular, the need for 
a program that would take care of 
the delicate formatting needed for 
mathematics typesetting. In the 


Richard Furuta and Pierre A. 
MacKay, Univ. of Washington, Seat- 
tle WA. 


ness letters to railway schedules, but 
the heart of the program is book- 
production, and it can only be truly 
understood in that light. 

An earlier version of this program, 
now distinguished as Tf#X78, was de- 
veloped for the Stanford University 
DEC-10 system, using the SAIL pro- 
eramming language. Subsequently, 
TeX78 was translated into Pascal, 
and ported to a variety of main- 
frames. Based on this experience, 
the program was completely re- 
designed and reimplemented, and it 
is this newest version of the program 
that is today called Tx. 

One of the commonest criticisms 
of TjX78 was its sheer size and con- 
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sequent inaccessibility. Most users 
of TReX78 would not readily have be- 
lieved that the current, more pow- 
erful version of the program could 
possibly be made available in the 
small systems world. But here it 
is in two different versions for the 
PC-XT and its look-alikes. As we 
shall demonstrate below, it takes a 
large XT to run TpX, and it takes a 
good deal of disk space to store it, 
but both programs are genuine Trx, 
and have been tested and validated. 

Throughout this review, we will 
refer to two TRX-related publica- 
tions: The TRXbook and TUGboat. 
The TyXbook is the manual that 
describes TRX. Written by Donald 
Knuth and published by Addison- 
Wesley, it costs $14.95 in book- 
stores. The TUGboat is the newslet- 
ter of the TeX Users Group (also 
known as “TUG” ). No matter which 
version of TX you purchase, we be- 
lieve that you will want to become 
a member of the TeX Users’ Group. 
The initial yearly membership cost 
is $20.00, and this includes a sub- 
scription to the TUGboat. TUG is 
the best way to keep up-to-date with 
the latest TX developments and 
the TUGboat is an excellent place 
for you to share your own TpX dis- 
coveries. Write to the TX Users’ 
Group, at P.O. Box 9506, Provi- 
dence, Rhode Island 02940 for more 
information. 

The distribution of MicroTpX and 
PCTpeX marks a break from the pat- 
tern established under the sponsor- 
ship of the TRX Users Group for 
larger systems. The broad aim for 
larger systems through the network 
of TUG site coordinators has been 
to place full source code in the hands 
of the systems programmer at each 
location, so that the site will have 
full control over compilation and 
validation. This approach has de- 
pended on the assumption that the 
site will have a great deal of di- 
rectly or indirectly addressable pro- 
gramming memory, and a robust 
and fully functional Pascal compiler. 
(In the past two years, experience 
has led to the formation of “David 
Fuchs’ Law of Pascal Compilers,” 
that TX will smoke out a bug in 
every compiler created earlier than 
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TEX itself.) 


Even on a mainframe system, a 
TeX compilation can take hours 
(some have looked as if they were 
going to run for days), and the 
compilation time on a PC must be 
quite alarming. These two ver- 
sions of TX for the PC give the 
user the benefit of the special ef- 
forts of two long established mem- 
bers of the TeX community. Lance 
Carnes, the author of PCTRX, is the 
TUG site coordinator for “small” 
TeX. David Fuchs, the author of 
MicroTRX, is second only to Don- 
ald Knuth in his long association 


with TrX. Both versions produce 
an identical output file from iden- 
tical input files (more later about 
the output format, called DVI), and 
both have gone successfully through 
the “torture test” validation pre- 
scribed by Donald Knuth for true 
implementations of TX. The im- 
plementation methods, however, are 
quite different. MicroTfX was de- 
veloped through a translation from 
Pascal to C, while PCTpxX has fol- 
lowed the usual route of direct Pas- 
cal compilation. (Microsoft’s Pascal 
compiler came through rather hand- 
somely in this effort, with only one 
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bug.) There are various arcana com- 
plicating the above histories. David 
Fuchs wrote a post-optimizer for 
the C compiler to improve perfor- 
mance, and Lance Carnes had to 
work up a collection of segmented 
pointer types for Pascal along with 
the address calculation routines to 
go with them. 

Each version of ThX is delivered 
in a large box. MicroTR@X arrives 
with a copy of The TRrXbook (also 
available separately in bookstores), 
a 92 page installation and introduc- 
tion manual and 8 diskettes. The 
diskettes contain TrX, fonts, and 
DVI-EPS, a program that prints 
TrX’s output files on the IBM 
graphics printer and its near rela- 
tives. We tested MicroTf@X on an 
XT. We understand that the cur- 
rent version also runs on an AT. 

PCTRX’s box includes a_ binder 
containing a 26 page installation 
manual, a 128 page introduction 
to PCTpX, including a description 
of their own macro package, in- 
tended for beginners, a summary of 
the AyS-TeX macro package, and a 
reprint of the manual for the JATP#X 
macro package. A program to print 
output on IBM and Epson graph- 
ics printers and The TjXbook can 
be purchased separately. PCTRX 
distributes TX, its associated font 
tables, and the macro packages on 5 
diskettes. If PC-DOT, the program 
to print the output, is purchased, 
an additional 8 diskettes contain the 
program along with its fonts. Two 
versions of TX are provided—one 
for a PC with 512K-bytes of mem- 
ory and another for one with 640K- 
bytes. MicroTRX automatically re- 
configures itself to use as much 
memory as is available, from 512K- 
bytes to 640K-bytes. We success- 
fully installed and tested PCTRX on 
both an XT and an AT. 

The system requirements for 
these two versions of TX are simi- 
lar. Each requires an IBM PC with 
a hard disk, a floppy disk drive, and 
at least 512K-bytes of RAM. You 
will need about 5 megabytes of hard- 
disk storage although this amount 
can be trimmed down once the sys- 
tem is installed. 

Taking the MicroTpx distribution 
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first, it gets very high marks for ease 
of installation. At first accidentally, 
but then deliberately, I made every 
non-destructive error I could think 
of, and MicroTRX was forgiving of 
all of them. There is one slight 
warning I would give, however. Af- 
ter TX is loaded, you are instructed 
to copy in the compressed version of 
the fonts, and then to get the pro- 
cess of decompression started and 
walk away for the 50 or so minutes 
it takes. Not quite. Immediately 
after the process starts, you have to 
supply the disk containing the sys- 
tem’s COMMAND. COM file in drive A. If 
you have walked away too early, you 
will come back to find that nothing 
at all has happened in the past hour. 

Other than that, everything is 
smooth. Within two hours, TRX 
is running, and you can try out the 
sample files on the directory, one 
of which is called SAMPLE.TEX. Mi- 
croTRX offers four levels of print 
quality on the Epson printer, and 
the observed times for each are given 
below. (SAMPLE. DVI is a reasonable 
test, since it loads a fair number of 
fonts.) At this point, if you are run- 
ning the minimum 512K-byte con- 
figuration on your XT, you may 
run into trouble, however. Print 
your SAMPLE.LOG file, and DOS will 
load the printer driver into memory. 
Now try to run TpX, and you will 
be told, “Not enough memory for 
TeX.” The MicroTf@X manual warns 
the user that it may be necessary 
to leave out some of the resident 
drivers, but with DOS 3.0 in 512K- 
bytes, it is necessary to leave them 
all out. One might almost imagine 
that the program was distributed as 
an incitement to purchase that last 
128K-bytes of memory. 

PCTpxX also installs smoothly, al- 
though we didn’t deliberately try 
to make errors this time. The in- 
stallation manual provides a step 
by step description, and installing 
TRX takes about half an hour. In- 
stalling PC-DOT and its associated 
fonts takes another hour or so— 
as with the MicroTRX installation, 
most of this time is spent waiting 
for fonts to be uncompressed. Un- 
like the MicroTRX installation, you 
have to attend to PCTRX during the 


installation process, swapping flop- 
pies as requested. 

The installation of PCTRX in- 
volves a few more steps than the 
installation of MicroTRX, but you 
gain certain advantages as a result. 
To understand these it is neces- 
sary to consider how TRX is put 
together to make a working type- 
setting system. A pristine version 
of TX is a very minimal typeset- 
ting program indeed. It provides 
the necessary primitive operations 
for character positioning at the low- 
est possible level, a sort of “assem- 
bler code” for typesetting. No rea- 
sonable person would even consider 
formatting a page at this level. The 
other side of the program is an ex- 
tremely powerful macro processor. 
(The macro processor was an af- 
terthought and an adjunct to the old 
TReX78, but it is at the very heart 
of the present program.) Only af- 
ter a large number of macros has 
been processed and evaluated do 
you have a fully operational type- 
setting system. All currently avail- 
able versions of TeX come with 
a macro file known as PLAIN.TEX, 
which forms the basis for any further 
refinements. PLAIN.TEX provides 
a great variety of convenient han- 
dles for common typesetting conven- 
tions, preloads a number of fonts, 
and arranges for the input of the 
hyphenation dictionary that is one 
of TrX’s most remarkable features. 
(The stories of incompetent hy- 
phenation algorithms in computer- 
assisted typesetting systems make 
up quite a tale of horror.) Get- 
ting all this stuff converted to to- 
kens and premasticated into an ef- 
ficient form for TRX to use takes 
time and the large-machine distri- 
butions of TR&X actually provide for 
two separate compilations of the 
program, one known as INITEX to 
do the massaging and cough up a 
predigested format file, and VIR- 
TEX, a second, smaller version with a 
weaker digestive system, which can 
read in the predigested PLAIN.FMT 
(notice the change in suffix) at a 
relatively high speed. In MicroTRX 
this has all been done for you, and 
the preloaded TrxX is instantly ready 
to run. In PCTRX you get to do 
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it yourself. 

The executable file provided with 
PCTRX is a VIRTEX with a special 
hook provided to call in the capabil- 
ities of INITEX as an overlay. The 
initial run of TX is done with a 
special flag on the command line, 
and is devoted entirely to masticat- 
ing and regurgitating the PLAIN. TEX 
file. (These alimentary metaphors 
are extremely pervasive in the doc- 
umentation of TeX.) From then on, 
although you will be told that the 
TeX you are running has no for- 
mat preloaded, the program will 
read in the PLAIN.FMT file automat- 
ically, without being prompted, and 
at more or less the optimum speed 
for a disk to memory transfer. As a 
result, PCTRX takes about 20 sec- 
onds longer to go into action than 
MicroTRX, but it gains in many im- 
portant ways. One of these is im- 
mediately evident from listing the 
files in the TEXINPUT directory. As 
we noted above, PCT&X comes with 
both AyS-TeX for advanced math- 
ematics formatting and with IATpXx, 
which is a powerful document for- 
matting package using a syntax that 
allows you to describe a document 
by its logical structure instead of by 
its appearance. Both of these macro 
files are large—IATpX is immense, 
requiring 640K-bytes to run—and 
you would soon weary of waiting for 
the macro-interpreter to do its thing 
with them if you had to read them 
in at the start of every invocation 
of TeX. The IATpX or the AyS$-TRex 
format file, however, can be read 
into place in almost the same time 
as the smaller PLAIN. FMT. 

Another, even more subtle advan- 
tage of having an INITEX available 
has to do with the hyphenation ta- 
ble. Hyphenation rules differ consid- 
erably from language to language, 
and a user with a large amount of 
French or German text to set will 
more or less be forced to create a 
new FMT file to get satisfactory re- 
sults. The creation of a new hy- 
phenation table is non-trivial, and 
neither version of TX for the PC 
provides the program that does it, 
but assuming that PATGEN has been 
run on some larger system, it still re- 
mains that the only practical way to 
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get at the new hyphenation patterns 
is through the use of INITEX. Inci- 
dentally, this question of hyphen- 
ations is one of the only genuine 
limitations in the use of TRX for 
continuous text. There is not, at 
present, any way of switching from 
one hyphenation pattern to another 
in the course of a run. You may 
hyphenate efficiently in English, or 
in French, but not in both together. 

Once either MicroTRpX or PCTRX 
has begun reading the user input file 
there is very little difference between 
them. The TeX TRIP.TEX “torture- 
test” guarantees that we can assume 
that they are functionally identical 
and that they correctly recognize 
and process TX. It is theoretically 
possible that a TeX might pass the 
torture-test and later produce a DVI 
file that was subtly different from 
that produced by all other TpXs, 
but it has not happened yet, and 
if it does, the test will probably 
be revised to eliminate the error. 
The normal benchmark is the set- 
ting of the TRXbook, and in an- 


A FULL C 
COMPILER 
FOR 








costing up to 10 times as much: 
Seive Fib 


12.1 sec. 






$4995 


The Eco-C88 C compiler is setting a new standard for price and 
performance. Compare Eco-C88's performance to compilers 


Defref 
137 sec. 


7782 79120 
Compile-link 77 Sec. 92 Sec. 






nouncements in a recent edition of 
TUGboat, the XT speed for this ef- 
fort was given as 26.4 seconds a page 
for MicroTR@X and “about 25 sec- 
onds a page” for PCTRXx. In normal 
use, that is a very close race indeed. 
(PCTRX’s running time on the AT 
is about six seconds a page.) 

A true TrX-hacker will notice an- 
other difference between the two 
programs. MicroTRxX is based on the 
latest version of TeX (we now have 
Version 1.4), while PCTpX is based 
on a somewhat older version (1.0, in 
our case). Usually, this would not 
be significant since the change from 
version to version has been quite 
small. Unfortunately, however, Ver- 
sion 1.3 incorporated major changes 
to [fX’s memory management rou- 
tines that greatly reduced the pos- 
sibility of running out of memory 
while TmX-ing a document. We are 
assured that PCTpX will be brought 
up to date soon. 

The version of IAT;X distributed 
with PCTRxX is also outdated, which 
may cause some difficulties if you 
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try to move those files to another 
computer since IATpX is still being 
developed and is undergoing rapid 
change. We transferred over the lat- 
est version of IATf@X and were able 
to run it on PCTpRX after shorten- 
ing one font name that was too long. 
If you are running a newer version 
of IATR@X on another computer, we 
expect that you will want to up- 
date PCTRX’s copy before building 
the FMT file. 

We understand that AyS-TEX is 
now being developed using PCTRX, 
so we believe that the version dis- 
tributed here is completely up to 
date. 

Throughout this review, we have 
mentioned TprX’s device-indepen- 
dent output file. Now, the time 
has come to turn back to general 
issues and to consider the implica- 
tions of this. 

In order to appreciate the na- 
ture of the DVI file, it is helpful 
to know something about the ac- 


tual genesis of TRX. TRX is not 


a ‘word-processor’ in any ordinary 


resolution of 1/ 


sense of that mildly repellent term. 
The target machine for the origi- 
nal program was a genuine digital 
phototypesetter, using silver halide 
typesetting film to record characters 
painted on a CRT. That particular 
machine, in fact, has the highest 
resolution known in the industry— 
almost four times that of its near- 
est rival. But TRX does not stop 
even there. It produces a file for an 
imaginary typesetting device with a 
216 printer’s points 
(there are 72.27 points to the inch), 
and leaves it to a second program to 
interpret that file for real-world de- 
vices. This output file is known as 
the ‘device-independent’ (DVI) file 
and is guaranteed to be exactly the 
same for any given source file when 
produced by a properly installed 
and tested Tx. 

This notion of device indepen- 
dence goes far deeper than that in 
most other systems. It allows such 
an absolute confidence in the qual- 
ity of results that the DVI file has 
seriously been proposed as a stan- 
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dard for document interchange in 
Europe. The suggestion is that 
on-line document retrieval from li- 
braries be sent in DVI format for 
selective printing at the requesting 
site. But this is not to claim that 
TeX and the DVI file are the pre- 
ferred system for all applications. 
The principal virtues of TRX carry 
with them certain constraints. 
Perhaps the least generally under- 
stood are the constraints inherent in 
writing for a high-resolution photo- 
typesetting system. At the present 
time, and with the presently avail- 
able fonts, TeX optimizes for the 
best output device available. On 
an Alphatype, Autologic, Compu- 
graphic or any of the other high- 
resolution typesetters for which DVI 
interpreters have been written, the 
interword spacing and _ inter-letter 
spacing are evaluated with round- 
off errors too small for the human 
eye to detect. At the most popular 
laser-printer and electrostatic reso- 
lutions (200, 240, and 300 dots to 
the inch) round-off errors are usu- 
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ally inoffensive, but they are nearly 
always discernable. It is simply im- 
possible to do justice to the delicacy 
of high-resolution typesetting at 300 
dots to the inch. (When we say that 
a device’s resolution is, for example, 
200 dots to the inch, we mean that 
the individual dots making up an 
image can be positioned to a reso- 
lution of 1/200th of an inch.) 

This is not to say that the results 
are bad. Several thousand happy 
users of TX have never seen their 
output at any resolution better than 
200 dots to the inch, but others have 
wondered why the program cannot 
be better tuned to laser-printer res- 
olutions and to the newer carefully 
designed laser-printer fonts such as 
Bigelow and Holmes’s Lucida. The 
answer is that it can be so tuned, 
through the use of the ‘Tx Font 
Metric’ TFM file, a file which pro- 
vides TeX with all the vital statis- 
tics about font characters, such as 


height, depth, width, letter-spacing 
adjustments (kerning), etc. If the 
manufacturer or distributor is will- 
ing to provide the necessary infor- 
mation, a TFM file can be made up 
to match any font currently avail- 
able. It is not even a very laborious 
job. But a TFM file is not a font. It 
will not produce characters on any 
output device at all. 

In some senses this can be an 
advantage. Suppose you wish to 
produce a book in the Baskerville 
font, and you have found a type- 
setter manufacturer who will pro- 
vide you with sufficient information 
about its Baskerville fonts to pro- 
duce the needed TFM file. For your 
final, high quality output, you have 
the problem solved; TX will read 
the TFM file and make all its calcula- 
tions based on the character widths, 
te., of that font. But you do not 
want to do the proof copies on a 
slow, expensive photographic pro- 


cessor, and there is no 300-dot/inch 
Baskerville on your laser printer, far 
less on your graphics impact printer. 
If you are willing to shut your eyes to 
the bad letter spacing, and are con- 
cerned primarily with correcting ty- 
pos and misspellings, you can make 
some font that you do have on your 
low to medium resolution printer 
masquerade as Baskerville. The la- 
ser printer output will look dreadful, 
but the cost of proof correction will 
be kept within reason. Conversely if 
the laser printer output is what you 
really want, there is no reason to 
use an ersatz high-resolution font at 
all. Create a TFM file that genuinely 
matches one of the fonts specially 
designed for use at 300 dots/inch 
and your laser-printer output will 
be very acceptable indeed. 

It is even possible to create a TFM 
file and an associated format file for 
a daisy wheel printer. To run TRX in 
this mode is to give up at least nine- 
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Suspend CP/M applications such as WordStar, dBase, and 
SuperCalc, with a single keystroke and look up phone 
numbers, edit a notepad, make appointments, view files and 
directories, communicate with other computers. Return to 
undisturbed application! All made possible by Write-Hand- 
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Bonus! User extendable! Add your own applications to Write- 
Hand-Man. All you need is M80 or RMAC. 


$49.95 plus tax (California residents), shipping included! 


Volume discounts. 


Available on IBM 8 inch and Northstar 5 inch disks. Other 5 
inch formats available with a $5.00 handling charge. CP/M 2.2 
required. 


COD or checks ok, no credit cards or invoices 
Poor Person Software 
3721 Starr King Circle 
Palo Alto, CA 94306 
tel 415-493-3735 
Write-Hand-Man trademark of Poor Person Software, CP/M and RMAC trademarks of Digital 


Research, Sidekick trademark of Borland International, dBase trademark of Ashton-Tate, WordStar 
trademark of Micropro, SuperCalc a trademark of Sorcim, M80 trademark of Microsoft. 


Circle no. 71 on reader service card. 


85 


tenths of its power as a typesetting 
system, but it can be done. The 
important thing is to recognize that 
letter-spacing and interword spacing 
are governed by the values supplied 
in the TFM file, and once the choice 
has been made, the DVI format will 
record that choice with breathtak- 
ing accuracy. No matter what the 
resolution is of your target machine, 
the DVI file will represent something 
| far better than the best that that 
machine is capable of. 

So while there are no technical 
reasons why TX output cannot be 
tuned to particular output devices, 
such tuning is almost never done 
in practice, and in fact this tuning 
is usually considered to be an un- 
desirable thing to do. The reason 
for this is that tuning introduces 
device and resolution dependencies 
into the DVI file and these depen- 
dencies will negate the more gen- 
eral concept of device independence 
provided by TeX. For not only are 
the positionings of the characters 
of a page described in a device- 
independent manner, but the char- 
acters themselves are also defined in 
a device-independent fashion. 

The fonts used by TX are pro- 
duced from descriptions—programs, 
if you will—written in a language 
called METAFONT. A METAFONT 
program defines a font’s characters 
by specifying the movement of a 
pen over a Cartesian coordinate sys- 
tem. As the name of the system 
implies, a “meta-font” is defined in 
this fashion—in other words, a sin- 
gle METAFONT description can be 
used to produce a family of related 
fonts (for example, separate fonts in 
roman and bold face) by varying the 
parameters that control values such 
as the pen shape and size. The im- 
portant result in the context of this 
review, is that the description also 
is resolution-independent. In other 
words, the description will produce 
font bitmaps for use at different res- 
olutions when the appropriate pa- 
rameters are altered. 

At present, only one generally 
available family of fonts, the Com- 
puter Modern family, has been de- 
fined through METAFONT. Varia- 
tions within the family provide ser- 


ifed roman, bold, italic, and slanted 
faces, a typewriter face, and a set 
of sans-serifed faces, each in a range 
of point sizes. TRX use is tightly 
coupled to the Computer Modern 
font family because of the flexibil- 
ity afforded by the METAFONT de- 
scription. 

Since the Computer Modern fam- 
ily of fonts can be generated at al- 
most any resolution needed by a de- 
vice, and since the DVI file format 
represents the output with a pre- 
cision unattainable by any device, 
the TeX concept of “device indepen- 
dence” can be restated as providing 
the same output on every output 
device, constrained only by the lim- 
itations of the device. There are 
two aspects to this formulation of 
device independence. One is that of 
source-level independence. In other 
words, every implementation of TX 
should produce an identical DVI file 
from a TRX source file, if that 
source file uses the standard TX 
environment—the Computer Mod- 
ern fonts and the facilities defined 
in The TpXbook. The second aspect 
is that of output-level independence. 
A DVI file produced by any imple- 
mentation of TX should be able to 
be printed on any suitable printer, if 
the standard TX environment has 
been used. DVI files can be, and 
frequently are, transferred from one 
model of computer to another in or- 
der to take advantage of the printers 
attached to the particular comput- 
ers. As a practical aside, the most 
frequently encountered problems in 
developing the mechanisms that al- 
low the transferring of a DVI file 
from one computer environment to 
another are related to the differing 
computer architectures and to the 
file transfer itself. The DVI file is 
defined as a stream of 8-bit bytes. 
Finding a file transfer mechanism 
that allows transmission of all eight 
bits of the byte sometimes involves a 
time consuming search. Differences 
in the ways in which these bytes are 
packed into the computer’s words 
also may cause difficulties that re- 
quire careful attention to overcome. 

As the standard TrX environment 
is sO important to maintaining de- 
vice independence, you should con- 


sider the capabilities and cost of the 
printer that you will need carefully 
before deciding to purchase TrX. To 
get the full benefit of TX, the out- 
put device you choose must be pow- 
erful enough to simulate TjX’s ideal 
device and further, your device must 
allow you enough flexibility to allow 
you to use the Tx fonts. 

What this means is that you 
should not plan to use a mecha- 
nized typewriter with TeX. Techni- 
cally, you certainly could build the 
TFM font width tables to describe the 
typewriter’s characters, but practi- 
cally, TeX documents produced in 
this way will be incompatible with 
everyone else’s and you will be un- 
able to use most of TRX’s more pow- 
erful features. What you will want 
to have is either a printer that al- 
lows you to do full page bit graphics 
or one that allows you to define your 
own characters and place them ar- 
bitrarily on the page (or, of course, 
one that allows you to do both). 

Very few printers can print a DVI 
file directly. Generally, the DVI file 
is converted into a form compatible 
with the printer by an application 
program called, in TX lingo, the 
Output Driver. As a practical mat- 
ter, before you buy a printer for 
TeX use, you should make sure that 
the appropriate Output Driver soft- 
ware already exists for your com- 
puter. Writing such a conversion 
program is not an extraordinarily 
hard programming project, but get- 
ting the output to look “right” in- 
volves surprising subtleties. It is 
often more convenient to purchase 
the conversion software so you can 
get directly to the matter of creat- 
ing beautiful documents. 

Printers appropriate for TX use 
can be placed into three different 
categories, based on the resolution 
at which fonts can be defined and 
at which elements of the image can 
be placed. 

Low-resolution printers are usu- 
ally impact printers. The lowest res- 
olution at which recognizable out- 
put can be produced is about 75 
dots/inch. Some printers of this 
type can print at resolutions up to 
200 dots/inch. At the lowest resolu- 
tions, the output from these printers 
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is often unreadable, particularly in 
mathematical equations and in foot- 
notes where the type sizes tend to 
become quite small. At the high- 
est resolutions, the printers can take 
quite long to print each page—up to 
five minutes per page in some cases. 
Both PCTRX and MicroTRX make 
available software to print TX out- 
put on a number of these printers 
(both products support the IBM 
Graphics printer and the Epson RX 
and FX printers). 

At the other end of the range 
are high-resolution printers. These 
print at resolutions greater than 
1000 dots/inch and are generally 
phototypesetters—devices produc- 
ing output on photographic paper 
that must be developed before the 
image can be inspected. They are 
frequently quite slow (several min- 
utes per page of output) and quite 
expensive to purchase and to op- 
erate. They are, however, the 
only acceptable way to produce out- 
put suitable for publication in high- 
quality books. Fortunately, a num- 
ber of businesses own phototypeset- 
ters and are equipped to print Tx 
DVI files from IBM PC disks. The 
advertisements in the TRX Users 
Group Newsletter, the TUGboat, are 
the best way to locate these busi- 
nesses. 

In the middle is an increasingly 
important group of devices: the 
medium-resolution printers. Most 
of these printers are laser printers, 
and the 300 dot/inch resolution is 
becoming somewhat of a standard. 
While it is not possible for devices of 
this resolution to produce true book 
publication-quality output (the ad- 
vertising claims of manufacturers 
notwithstanding), it is quite real- 
istic to expect to be able to use 
these printers to produce output 
for less demanding applications such 
as newsletters, memos, and proofs 
of material that will ultimately be 
sent out for typesetting on a high- 
resolution printer. Some of the laser 
printers are not suitable for TeX use, 
as will be discussed, but those that 
have successfully printed TeX out- 
put range in price from about $4000 
upward and print at speeds from 
about five pages per minute upward. 
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A laser printer is built from a 
marking engine and a controller. 
The marking engine is what puts 
the marks onto the paper. The 
controller drives the marking engine 
and provides the hardware and soft- 
ware interfaces that are visible to 
the person programming an appli- 
cation to print on the laser printer. 

When comparing different laser 
printers, it is important to dis- 
tinguish between the functions of 
marking engine and those of the con- 
troller. For example, it is usually 
correct to assume that maintenance 
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statistics for one laser printer will 
also hold for a different printer if the 
two use the same marking engine. It 
is incorrect, however, to assume that 
information on the graphical capa- 
bilities of one manufacturer’s laser 
printer will be valid for another’s, 
even if the two printers both use the 
same marking engine. 

As illustration, one commonly 
used marking engine is the Canon 
LBP-CX. This marking engine, used 
by many different laser printer man- 
ufacturers, is the heart of the Im- 
agen 8/300, the QMS 800, the 
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Perhaps an example taken from the 
TeXbook will illustrate this best. This 
is exercise 18.40 from the chapter “Fine 
Points of Mathematics Typing’. 


ysl) = [ flt) drt), 


é 


The DVI output from this paragraph is 
shown in varions resolutions from the low- 
est Micro TEX resolution on the printer up 
to the 5333 line/inch resolution of the Al- 
phatype CRS. 


PC - DOT Draft 


Perhaps an example taken from the 
TeXbook will illustrate this best. This 
is exercise 18.40 from the chapter “Fine 
Points of Mathematics Typing”. 


y= f Sand) 


The DVI output from this paragraph is 
shown in various resolutions from the low- 
est MicroTX resolution on the printer up 
to the 5333 line/inch resolution of the Al- 


phatype CRS. DVI - EPS Level 1 


Perhaps an example taken from the 
TeXbook will illustrate this best. This 
is exercise 18.40 from the chapter “Fire 
Points of Mathematics Typing’. 


=f A (tf) dat). 


The DVI output from this paragraph is 
shown in various resolutions from the low- 
est Micro TWX resolution on the printer up 
to the 6888 line/inch resolution of the Al- 
phatype CR&. 


fp ba 


DVI - EPS Level4 


Perhaps an example taken from the 
TeXbook will illustrate this best. This 
is exercise 18.40 from the chapter “Fine 
Points of Mathematics Typing”. 


SS” f= f(t) dx(t). 


p prime 


The DVI output from this paragraph is 
shown in various resolutions from the low- 
est MicroTRX resolution on the printer up 
to the 5333 line/inch resolution of the Al- 


phatype CRS. Apple Laser Writer 


Figure 


Perhage am example taken from the 
TEXbook will illustrate this best. This 
is exercise 18.40 from the chapter “Fime 
Points of Mathematics Typing”. 


ce > se) = £. f(t) x(t). 


The DVI output from this paragraph is 
shown in various resolutions from the low- 
est MicroTrX resolution on the printer up 
to the 5333 line/imch resolution of the Al- 
phatype CRS. 


PC - DOT Final 


Perhaps an example taken from the 
TeXbook will illustrate this best. This 
is exercise 18.40 from the chapter “Fine 
Points of Mathematics Typing’. 


y 10) = =f s(t) dx(t) 


Pp pt 


The DVI output from this paragraph is 
shown in various resolutions from the low- 
est MicroTpX resolution on the printer up 
to the 5333 line/inch resolution of the Al- 
phatype ORS. 


DVI - EPS Level 2 


Perhaps an example taken from the 
TrXbook will illustrate this best. This 
is exercise 18.40 from the chapter “Fire 
Points of Mathematics Typing’. 


> fle) =f  flt)de(t). 


p pr)me [>I 


The DVI output from this paragraph is 
shown in various resolutions from the low- 
est Micro TFX resolution on the printer up 
to the 5888 line/inch resolution of the Al- 
phatype CRS. 


DVI - EPS Level 3 


Perhaps an example taken from the 
TeXbook will illustrate this best. This 
is exercise 18.40 from the chapter “Fine 
Points of Mathematics Typing”. 


p)= | sant) 


The DVI output from this paragraph is 
shown in various resolutions from the low- 
est MicroTFX resolution on the printer up 
to the 5333 line/inch resolution of the Al- 
phatype CRS. 


Be 


Alphatype CRS 


Samples of TEX Output 
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HP LaserJet, and the Apple Laser- 
Writer. What distinguishes these 
laser printers from one another are 
the interfaces implemented by their 
controllers. The HP LaserJet, for 
example, is essentially an upgrade 
for a mechanized typewriter-like de- 
vice. It does not allow fonts to be 
loaded over its hardware interface 
line and full-resolution bitmaps are 
limited to about one quarter page. 
We do not know of software that 
allows printing of TrX’s output for- 
mat on the HP LaserJet and suspect 
that such software will be extremely 
difficult, if not impossible, to write 
because of the printer’s limitations. 
On the other hand, the Apple Laser- 
Writer implements an interface lan- 
guage called PostScript. PostScript 
is a general purpose programming 
language, Forth-like in appearance, 
and is one of the most sophis- 
ticated printing languages avail- 
able (PostScript is based on an 
earlier Xerox-defined printing lan- 
guage, which is named InterPress). 
The LaserJet and the LaserWriter 
use the same marking engine but 
are radically different in the sophis- 
tication of the functions that they 
provide. 

Indeed, to a programmer provid- 
ing TX support, the interface lan- 
guage defined by the laser printer’s 
controller is usually more important 
than which marking engine is being 
used. The interface language is gen- 
erally the same or similar for a com- 
pany’s laser printers, even though 
those products may use significantly 
differing marking engines. 

The companies that make PCTRX 
and MicroTeX have announced that 
they will be supporting TX out- 
put from the IBM PC for the Ap- 
ple LaserWriter, the Imagen laser 
printers, and the QMS laser print- 
ers. Another relatively low cost la- 
ser printer, the DEC LN-03, has 
been supported, although not yet on 
the IBM PC. A full list of supported 
devices is printed in each edition of 
the TUGboat. 

An additional difference between 
the two implementations becomes 
apparent when comparing the two 
Epson drivers. DVI-EPS, included 
with the MicroTfX package, pro- 


Dr. Dobb’s Journal, September 1985 


9 TRACK TAPE CONTROLLERS 
AND %" TAPE SUBSYSTEMS 


MODEL TC-PC 
TC-PC is a high performance 9-track tape 
controller for the IBM-PC with these important 
features: 
e Reads and writes industry standard ¥2-inch 
tape 
¢ Compatible with most formatted tape drives 
¢ Standard 8-bit parallel recording with parity, 
and read-after-write verification 
Switch selectable I/O address (four contiguous 
ports required for operation) 
Maximum data transfer rate of 192,000 bytes 
per second 
Record length from 1 to 65,535 bytes 
Supports up to 8 tape transports 
Jumper selectable DMA channel 
Modes: PE and NRZI at 800, 1600, 3200 and 
6250 bytes/inch 
Installable device drivers allow creation of 
application programs which run under IBM 
XENIX and MS-DOS 
Operates with IBM-PC and -XT; Compaq 
Portable; Zenith PC-150; Sperry PC; the 
Leading Edge Computer, and other 100% 
IBM-PC compatible equipment. 


MODEL TC-50 

TC-50 offers all the standard features of the TC- 

PC with these additional enhancements: 

¢ Maximum data transfer rate of 400,000 
bytes/second; 904,000 bytes/second with 
memory option 

* Operation with a wider range of IBM- 
compatible machines, including IBM-AT; 
Compaq Desk Pro; ATT 6300 and others 


XENIX and MS-DOS are Registered Trademarks of Microsoft Corp 

IBM-PC/AT/XT are Registered Trademarks of International Business Machines Corp 
Compag Portable and Compaq Deskpro are Registered Trademarks of Compaq Corp 
AT&T 6300 AT&T Information Systems Corp 

Sperry PC Sperry/Univac Corp 

Zenith PC-150 < Zenith Data Systems 

Leading Edge is a Registered Trademark of Leading Edge Products, Inc 


A variety of software utilities is supplied as part 
of the TC-PC and TC-50 packages, including: 


¢ DEPOT (Data Exchange Program with Optional 

Translation) 

DEPOT provides a means to transfer data 

between system disk and magnetic tape, 

allowing: 

— Data interchange from tape to disk, and 
disk to tape 

— Conversion from ASCII to EBCDIC, and vice 
versa 

— Positioning to arbitrary location prior to 
data read 

— Specification of record length and block 
factor when writing from disk to tape; 
allows deblocking when reading from tape 
to disk 

— Multiple operations to be specified from a 
command file 


¢ TAU (Tape Archive Utility) 

— Provides individual file backup and restore 

— Allows use of MS-DOS wild cards such 
ete. 

— Provides disk drive selections for I/O 

— Changes pathname selections from within 
TAU 

— Provides data encryption for security 


WARRANTY 


All Overland Data products carry a 30-day 
unconditional money-back guarantee, and are 
warranted for one year, parts and labor. 


OVERLAND DATA, INC. 


5644 Kearny Mesa Road #A 
San Diego, CA 92111 
Tel. (619) 571-5555 
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TEX82 Typesetting for your PC/XT or AT 


e Real, state-of-the-art typesetting capable of handling all 
mathematical and scientific hateHal 


¢ Produce work of this quality on your Epson printer: 





k a's l d's 
> > fle) = | f(t) dx(t). {0; eq Bos 8}. 
p prime f>1 ‘enema, seenmemmnremsene” 


k+1 elements 


e Produce this quality work on a Corona Laser Printer: 


» G(z) ie ein G(Z) as exp( — = a eSke* /k 





k>1 k>1 


includes a 120-page beginners guide and macros, 
and the LaTeX Document Preparation System and macros. 
e PCTRX is a full implementation of Donald Knuth’s TREX82. 
e PCTEX: only $279. PCDOT dot-matrix printer driver: $100. 
BM Graphics, Epson FX, RX 
CLaser printer drivers: $300. (For Corona, QMS, Apple.) 
Drivers include over 200 fonts. | 
Requires DOS 2.0 or better, 512K RAM, 10M hard disk. 


, LQ1500, Toshiba.) 


20 Sunnyside, Suite H, Mill Valley, CA 94941. 
(415) 388-8853. Telex 275611. 


TeX: American Mathematical Society. PCTRX: Personal TeX. Inc.. IBM-PC: IBM Corp.. QMS: QMS. Inc. 
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There are several other utilities that help with converting 
from one C compiler to another and with printing 
programs. 


C Helper is written in portable C and includes both full 
source code and executable files 


for $135 for MS-DOS, IBM AT Solution 
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Scrap your LINKER 


FASTER C 


Reliably: 


CUT Compile times (by 15% to 55%) 
CUT Testing times (by 12% to 37%) 


HOW: FASTER C keeps the Lattice C or C86 library and any other 
functions you choose in memory. It manages a jump table to replace 
the LINKER and immediately execute your functions. You can also 
CALL active functions interactively to speed your program debug- 
ging. Itincludes many options for configuration and control. 





“Automatic” support for new libraries by reading the .OBJ files 
makes support for new libraries quick and simple. 
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PROLOG-86 — 


Become Familiar in One Evening 


Thorough tutorials are designed to help learn the PROLOG language 
quickly. The interactive PROLOG-86 Interpreter gives immediate feed- 
back. In a few hours you will begin to feel comfortable with it. In a few 
days you are likely to know enough to modify some of the more 
sophisticated sample programs. 


Sample Programs are Included like: 


@ an EXPERT SYSTEM 


@ a NATURAL LANGUAGE INTERFACE 
(it generates a dBASE II ‘“‘DISPLAY”’ command) 


Wa GAME (it takes less than 1 page of PROLOG-86) 


PROTOTYPE Ideas and Applications QUICKLY 


Serious development of experimental systems and prototypes is practical 
with the full syntax of PROLOG-86. 1 or 2 pages of PROLOG is often 
like 10 pages in ‘‘C’’. 


Programming Experience is not required but a logical mind is. 
PROLOG-86 supports the de facto STANDARD. 
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help, load Editor. 
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vides four levels of printing on the 
Epson. We printed a fairly dense 
page of TfX output at each of these 
levels (see Figure, page 88) and ob- 
served that the time to print the 
page ranged from about 225 min- 
utes at the best quality (level 1) to 
only 35 minutes at the lowest qual- 
ity (level 4). Intermediate timings 
were 12 minutes for level 2 and 10 
minutes for level 3. In contrast, PC- 
DOT, available as an option with 
PCTpx, only provides two printing 
levels. The draft mode produced 
output similar to DVI-EPS’s level 
2, and took 123 minutes for our 
sample page. Final mode in POTRX 
is comparable to DVI-EPS’ level 1, 
and took 234 minutes to print. In 
all cases, print time seemed to de- 
pend more on the density of the 
page than on other factors. 

23 minutes is a substantial time 
to wait for a page of output to 
be printed. Consequently, we be- 
lieve that DVI-EPS is significantly 
preferable to PC-DOT. In particu- 
lar, DVI-EPS’ lowest quality level 
4 printing at under four minutes 
for the page will get quite heavy 
use during document development 
and proofing. What is desperately 
needed are mechanisms that allow 
the DVI file to be previewed on the 
PC’s screen, allowing the slow print- 
ing pass to be bypassed altogether. 

In summary, despite the essen- 
tial similarity of output from the 
two implementations of TeX for the 
PC, there are numerous differences 
that allow for a meaningful compar- 
ison. MicroTRX comes as a com- 
plete package, including TX, the 
format file, the DVI-EPS printer 
driver and its numerous fonts at sev- 
eral different pixel-densities, and the 
authoritative documentation of The 
TyX book itself. The version of TX 
is absolutely up to date, and the 
driver offers a wide range of output 
quality. All of this together comes to 
$495.00. You can run the program 
in 512K-bytes of memory, but only 
at the price of some inconvenience 
(no resident drivers in your DOS). 

PCTgX offers various options. 
The basic price of $279.00 gives you 
TeX, separately compiled for two 
different sizes of memory, and the 


Dr. Dobb’s Journal, September 1985 


AyS-TeX, and JATRX macro files, 
together with the mechanism for 
loading them efficiently. At the mo- 
ment PCTpx is still at version 1.0 by 
contrast with MicroTfX at version 
1.4. The PC-DOT driver program 
at $100.00 is not so broadly func- 
tional as the DVI-EPS program, If 
you want The TpXbook, you must 
order it separately for $15, but you 
do get the user documentation for 
IATREX and AyS-Tpex. 

In our judgment, the ideal pack- 
age would be PCTRX for the Thx 
together with DVI-EPS to drive the 
printer. Only those with larger 
pockets might consider this, since 
it requires buying both PCTRX and 
MicroTRX. Otherwise, especially for 
those with technical documentation 
in mind, we strongly favor the 
PCTpxX offering. We believe that 
the inclusion of INITEX capabilities 
in PCTRX is so important that it 
overrides the inconveniences caused 
by the lag in versions and by the 
less functional printer driver. 

(Addison-Wesley ts distributing a 
complete INITEX in the August up- 


oes your ISAM 
ron oniBM, 
APPLE. DEC 
anc] AT&T 
GOMMPUCCRPSY 
e-tree GlOGS> anG 
weuw only BUY 

iT ONCE? 


2606 Johnson Drive 
Columbia MO 65203 





date of MicroTpX.-Ed.) 

[This review was formatted with 
MicroTRX on an IBM AT with 512K 
in 2 minutes. The fully-composed 
output was uploaded to a Stanford 
mainframe and sent to an Auto- 
logic APS-micro-5 typesetter, with 
the results seen here.| 


PCTeX, Version 1.0 

Company: Personal TEX, Inc. 
20 Sunnyside, Suite H 

Mill Valley, CA 94941 

(415) 388-8853 

Price: $279.00; PCDOT $100.00 


MicroTeX, Version 1.4A1 
Company: Addison-Wesley 
Publishing Company, Inc. 
Reading, MA 01867 

(617) 944-3700 

Price: $495.00 
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SCSI Your Mac 


by John Bass 


I got tired of waiting on those slug- 
gish Mac floppy drives, tired of wait- 
ing for an affordable hard disk for the 
Mac. I got so tired, finally, that I 
went to work. My efforts paid off, 
and I was pleased enough with the re- 
sult to think that others might appre- 
ciate my MacSCSI® interface, too. 

One of the most obvious advantages 
to doing your own hard disk interface 
for the Mac is cost. I think MacSCSI 
is the hard-disk equivalent of DDJ’s 
January 1985 “Fatten Your Mac” 
512K upgrade: the hacker’s hard disk 
upgrade at budget prices, if you’re 
willing to shop around for disks and 
SASI/SCSI controllers. Here in Sili- 
con Valley we see hard disks at the 
computer swaps for between $100.00 
and $500.00, often either refurbished 
or new discontinued models that were 
surplus. Likewise, SASI/SCSI con- 
trollers are seen at between $50 and 
$150. Thus, with the MacSCSI inter- 
face and some bargain hunting you 
can put a hard disk on your Mac for 
less than $500. New production drives 
and controllers are available between 
$900 and $3000, depending on the 
size and performance. 

Another advantage is the experi- 
ence you'll gain, both in writing your 
own bells and whistles into the sup- 
porting software, and in simply 
cracking open your Mac and getting 
to know its innards better. And in this 
regard, the MacSCSI interface is un- 
like the 512K upgrade: you don’t 
have to take a soldering iron to a deli- 
cate, expensive logic board to install 
MacSCSI. You don’t have to modify 
the Mac logic board at all. 

The parts for this venture are few. 
The MacSCSI host adapter consists of 
four parts: an NCR5380 single chip 
SCSI interface, two 74LS10’s to pro- 
vide the address decodes, and a 50 pin 
header for the SASI/SCSI cable. The 


94 


rest of a complete setup is a SASI/ 
SCSI controller, hard disk drive, 
power supply, and cables for power 
and data. You can make your own 
case from a bookcase speaker for a 
few dollars, you can build a nice cus- 
tom cabinet, or you can buy an off- 
the-shelf hard disk enclosure complete 
with power supply and cables. 

Figure | (page 95) tells the story: it 
contains the schematic for the 
MacSCSI interface. The host adapter 
is memory mapped into the Mac’s 
ROM address space above its last val- 
id address. To accomplish this, I used 
selection equations for the NCR5380 
of 


NCRSEL = ROMSEL * A20 * All 
NCRRD = NCRSEL * A4 
NCRWRITE = UDS 


By using address lines to enable the 
read and write enables on the 
NCR5380, I avoided needing to run 
any wires to chips or to cut away at 
the main circuit board; the only inter- 
face point to the Mac is its ROM sock- 
et. This scheme does, though, require 
that the software read an NCR5380 
register at one address and write it at 
another—quite a reasonable tradeoff 
for not having to do any cuts or adds 
to the main logic board, I think. 
While it’s not clear whether Apple 
would honor a warranty or Apple 
Care contract on a Mac upgraded 
this way, if done carefully the up- 
grade will not physically alter or 
harm the Mac. If you have problems 
with your Mac (other than the 
MacSCSI upgrade), most helpful 
dealers should be willing to service 
your Mac if your boards are not al- 
tered or damaged. You may even find 
some helpful dealers and independent 
repair centers that will install the up- 
grade for you at their normal shop 


rates (about an hour of their time). 

If you’re up for a project, the inter- 
face can be assembled using off-the- 
shelf parts and point-to-point wiring. 
If you do it this way, you’ll need to 
make a chip carrier from perf board 
with holes on 0.1 inch centers. You 
can salvage the socket pins for the 
chip carrier by cutting apart two Au- 
gat low profile 28 pin sockets with 
machined pins. Then attach the perf 
board to a wooden support block and 
drill out to 0.055-inch in the pin pat- 
tern for the Mac’s ROMs. Keeping 
the wooden block attached, press the 
pins into the perf board using a vise 
or press (be careful not to crush the 
pins). The wooden block provides a 
die to protect the socket pins during 
the insertion process. You can then 
insert the other parts into the perf 
board and wire them using point-to- 
point soldering on the back side. Fi- 
nally, and carefully, remove the 
ROMs from the board, insert them 
into the chip carrier, and plug the 
chip carrier with the ROMs back into 
the ROM sockets. 

I’m skipping any discussion on how 
to take your Mac apart and reassem- 
ble it; for that, see the installation 
section on page 96. 

Now for the hard part. ’'ve come 
up with several options for getting the 
SCSI ribbon cable out of the case, 
none of them elegant. One is to cut a 
hole in the back of the case for an 
exit. Another is a panel-mounted 
connector installed in the case (my 
preferred solution). Or you can run a 
ribbon cable out between the bottom 
case seam in front, although you'll 
have to widen the seam slightly to do 
this. A fourth solution is not to bring 
the cable out at all, of course. Gener- 
al Computer has already demonstrat- 
ed the feasibility of installing a hard 
disk inside the Mac case. I haven’t 
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from your C programs 
with 


PC—LINT 








NCRCS/ 
& 








NCRSEL NCRRD/ 24 





—. PC—LINT analyzes your C programs (one 
or many modules) and uncovers glitches, 
bugs, quirks and inconsistencies. It will catch 

us NCRWRA/ 29 subtle errors before they catch you. 
M68000 Pin 7 


PC—LINT resembles the Lint that runs on 
- the UNIX O.S. but with more features and 
7. : - greater sensitivity to the problems of the 
: 8086 environment. 
Figure 1 


Mac SCSI host adaptor by DMS Design—Schematic Logic Drawing : * Full K&R C 
3 | ¢ Supports Multiple Modules—finds incon- 
sistencies between declarations and use 
of functions and data across a set of 
modules comprising a program. 
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_ _ ¢ Compares function arguments with the 
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| — there is a mismatch or too many or too 
St plage y 
7 Tey ¢ All warning and information messages 
| oxC deo (an may be turned on and off globally or 
— — e - locally (via command line and comments) 
. | OMA __Mac SCSi_| Mac SCSI so that messages can be tailored to your 
| | SAS | stant | OA Ra oo programming style. 
— | secs | Setecr | “SCC Read @ All command line information can be 
| STATUS - ie ms — — furnished indirectly via file(s) to automate 
Ts [errere | soc wa ides 
TARGET TARGET ee 
“ Ee DFxxFF ¢ Use it to check existing programs, pro- 
grams about to be exported or imported, 
| woe | Mooe | Ox4 : as a preliminary to compilation, or prior 
to scaling up to a larger memory model. 
Ox2 ¢ All one pass with an integrated pre 
sie processor so it’s very fast. 
oS 0x0 ¢ Has numerous flags to support a wide 
| 7 variety of C’s, memory models, and 
a — programming styles. 
 -0x50001X —-Ox50002x 
— ha Eon Byics ¢ Introductory Price: $98.00 MC, VISA 
- (Includes shipping and handling) PA residents add 6% 
- 2 Figure 2 sales tax. Outside USA add $10.00. 
Device Memory Maps ¢ Runs on the IBM PC (or XT, AT or 
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compatible) under DOS 2.0 and up, with 
a minimum of 128KB of memory. It will 
use all the memory available. 


GIMPEL SOFTWARE 


3207 Hogarth Lane ® Collegeville, PA 19426 
(215) 584-4261 


*Trademarks: IBM (IBM Corp.), PC—LINT (Gimpel Software), 
UNIX (AT&T) 
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‘External cabling 


: Materials Required | 

e Xcelite XTD-15 screwdriver with a 
6 -inch extension 
o wooden ruler 

y two cotton towels 






10-inch Mill Bastard flat file 

; . IC extractor or a small screwdriver 
to remove the 28 ‘pin ROMs | 

-e AMP connector 1-499970- 0; AMP 
Ground Plane 1027934 


¢ paper template tee Figure 3 page 


| 95) 


Opening the cose 
3 Disconnect the WE oe : 


| Xcelite XTD-15 Torx screwdriver; 


two are located under the handle, one 
“underneath the battery case plate, 


| and two at the es of the ee 






tried this yet. 

The software for MacSCSI is so far 
pretty simple. It consists of a routine 
to format the drive and a disk driver. 
Details of the operation of these two 
routines will vary a little depending 
upon the controller manufacturer 
and drive type. The Listing in this ar- 
ticle (page 98) is for a XEBEC $1410 
controller with rev D ROMs and a 
Seagate ST506 5Mb drive, both of 
which are common on the used mar- 
ket in Silicon Valley. As a starting 
point I used the RAMdisk supplied 
with the Aztec C Compiler release. 
The strategy was to use the basic 
RAMgdisk driver as a local cache and 
use a simple LRU algorithm for re- 
placement. Using the Aztec C exam- 
ple for the explorer desk accessory, 
we recoded the driver into C, for a 
slight loss in performance. On a 128k 
Mac the cache size should be set be- 
tween | and 10. On a 512k Mac you 
should use some number between 30 
and 300, optimally. 

Other development environments 
and C compilers may be used as well 
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id drill, 4- and an drill bits 









| tors, while lifting ¢ seitge oe should 
release it from the faceplate. Set 
the foil EMI sheild aside until | 


reassembly. © 


| | Cutting sie connector slot 
a | Using the paper template, mark the 
| slot to be cut into the back of the | 
-Macintosh. Remove most of the plas- 


tic from the slot with a handdrill, and 
square off the edges with the flat file. 
With the slot cut, recenter the tem- 
plate, mark and drill the ’-inch holes 


-_.__| for the 50 pin feed-thru header. Bolt 
_ : the header to the inside of the case, 
_ with pin | on the bottom. 


| Bomoving the Motherboard 

| | ROMs 

= pr event marring oie ples & case. , Re a 
move the five case screws with the 


Disconnect the diskdrive and analog 
board cables from the motherboard; 
remove the motherboard from the 
chassis and place it on the second 
towel. The ROMs are in the IC sock- 
ets marked ROM HI and ROM LO. 


ler | Using a chip extractor or small 


with minor changes in the coding and 
installation procedures. For Aztec C 
the documentation on the RAMdisk 
and explorer desk accessory provide 
all the magic incantations necessary 
to convert the source files into an in- 
stalled driver. 

Questions, anyone? How large a 
disk, you ask? It depends in part on 
the software; you can reasonably 
handle up to about five Mb of storage 
on the Mac without partitioning; at 
ten Mb the number of files gets un- 
wieldy. Then you'll just need more 
sophisticated software. Do you have 
to have a Fat Mac to support 
MacSCSI? No, but while this hard 
disk upgrade can work with many ap- 
plications on a 128k Mac, a 512k 
Mac is highly recommended. 

What if you don’t want to take the 
time to do it yourself? For the lazy, 
the MacSCSI board is available from 
Fastime, P.O. Box 12508, San Luis 
Obispo, CA 93406 for $150.00 as- 
sembled and tested, along with ma- 
chine-readable copies of the sources 
listed here. You can also get a com- 







rewdriver, carefully remove the 
chip marked ROM HI. Place the 
ROM in the socket marked ROM HI 
on the Mac SCSI board, and repeat 
the procedure for ROM LO. Double 
check the orientation of the ROMs by 
noting that the notch on each chip 


2 las way —_ the 30 pa header. 





Groat the Mac § SCSI ion with the 
50 pin header toward the I/O con- 
nectors on the motherboard, and sim- 
ply plug it into the vacated ROM 
sockets. Reinsert the motherboard 
into the chassis, taking care not to 
damage the 50 pin header. Reconnect 
the diskdrive and analog board ca- 


| bles, followed by the large Mac SCSI 


interface cable. 


Sloss the Mac back up 
Set the Macintosh facedown and po- 
sition the EMI sheild over the I/O - 
connectors. Replace the back, mak- 
ing sure each side is completely seat- 
ed, and secure the five holding 

screws. : 


plete kit, including drives from 1OMb 
to 110Mb, tape backup, and extend- 
ed software drivers with multiple soft 
partitions to support the larger 
drives. Drivers for disk sharing and 
the Appletalk file server are planned 
or under development. Write for 
more information. 

John L. Bass 

DMS Design 

P.O. Box 1456 

Cupertino, CA 95014 


DDJ 


(Listings begin on page 98) 
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Ma C Toolbox Lis ting (Text begins on page 94) 


all: clean FormatSCST ChkSCST MountSCSI MacSCSI BootSCSTI 
echo done 


clean: 
rm FormatSCSI MountSCSI MacSCSI BootSCSI ChkSCSI 
rm TestSCSI MSCSTI 
rm *. bak 

Print’: 


cat makefile > .bout 
cat newpage > .bout 
cat sl41@.c > .bout 
cat newpage > .bout 
cat np. fnt<e: >. bout 
cat newpage > .bout 
Cat: NPLAV Cc. C.F. GOut 
cat newpage > .bout 
cat newpage > .bout 


FormatSCSI: 
Ce np: Tmtyc 
ec sl418.c¢ 
In -mo FormatSCSI np_fmt.o sl419.0 sys:lib/mixcroot.o -lc 
cprsrc DRVR 38 sys:system FormatSCSI 
rm np_fmt.o sl418.0 


ChkSCST: 
ce np. chk yc 
ce si4igcc 
In -mo ChkSCSI np_chk.o s1418.0 sys:lib/mixcroot.o -lc 
Cprsrc DRVR 38 sys:system ChkSCSI 
rm np_chk.o sl418.0 


MacSCSI: 
cc;+be Ap avr, C 
cc -bu sl410.c 
In -d -n MacSCSI -I 28 -R 48 np_dvr.o sl41@.0 -lc -o MacSCSI 
ep -f£:MSCSTI. Testscsl 
cprsrc DRVR 28 MacSCSI TestSCSI 
rm np_dvr.o sl418.0 


MountSCSI: 
cc mountscsi,c 
In -mo MountSCSI mountscsi.o sys:lib/mixcroot.o -lc 
Ccprsrc DRVR 38 sys:system MountSCSI 
cp -f£ MountSCSI MSCSI 
cprsrc DRVR 28 MacSCSI MountSCSI 
rm mountscsi.o 


BOootsScst: 
cc bootscsi.c 
In -mo BootSCSI bootscsi.o sys:lib/mixcroot.o -lc 
cprsrc DRVR 38 sys:system BootSCSI 
rm bootscsi.o 


/t 
* s1418.c version 1.9, July 28, 1985 
* 
* MacSCSI I/O routine for XEBEC $1418 with ST566 drive and similar 
* SASI/SCSI controllers that are pre-SCSI standard. Other controller 
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* drive combinations will require changes. This version was developed 
*- on the Mac undér Aztec’ C, 
* 
* Copyright 1985 by John L. Bass, DMS Design 
* PO Box 1456, Cupertino, CA 95914 
* Right to use, copy, and modify this code is granted for 
* personal non-comercial use, provided that this copyright 
* disclosure remains on ALL copies. Any other use, reproduction, 
* or distribution requires the written consent of the author, 
* 
* Sources are available on diskette from Fastime, PO Box 12588 
* San Luis Obispo, Ca 934@6 -- (885) 546-9141. Write for ordering 
sere on this and other Mac products. 
* 
/* 
* SASI/SCSI Command and Sense Blocks 
ry 
struct scsicmd { 
char sc_cmd; /* command code */ 
char sc_adrH; /* High Byte of address */ 
char sc_adrM; /* Middle byte of address */ 
char sc_adrL; /* Low byte of address */ 
char SC_arg; /* count or interleave value */ 
char sc_vendor; /* vendor byte -- seek algorithm */ 
; 
struct scsisense { 
char ss_code; /* status code */ 
char ss_adrH; /* address when valid */ 
char ss_adrM; 
char ss_adrL; 
re 
* 


* NCR5380 registers on the MacSCSI host adapter found at 
* location 0x500008 
* 

struct NCR538@ { 


char wr_data, /* force scsi bus data */ 


(Continued on page 101) 
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TURBO PASCAL™ TOOLS 

With Super Tools™ and Turbo, YOU can write pro- 
grams that ‘‘pop up’’ from within Lotus 1-2-3™M, 
dBASETM etc. In addition, we've included source code 
to Super Macs, a resident keyboard macro processor! 


Routines included let you. . . 


: MAKE YOUR MOUNTAINS INTO MOLEHILLS: 
MINI-PRINT your PC-DOS Files 


Users’ 





Group 


Over 45 volumes of 
public domain software 
including: 


compilers 
editors 
text formatters 
communications 
packages 
e many UNIX-like tools 


Write or call for more details 


The C Users’ Group 
415 E. Euclid © Box 97A 
McPherson, KS 67460 

(316) 241-1065 
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e Write Sidekick™M-like resident programs. 
e Redefine keyboard. 

e Save and restore screen windows 

e 

we 





Write strings directly to video 
Read strings from screen. 


Super Macs™M keyboard enhancer’s features: 
200 simultaneous keys defined. 

1000 characters maximum per macro. 
Resident macro editor. 

Load & save from within programs. 
Predefined macros for Turbo and Dos. 


Additional routines: 
e Time and date access. 
e Dos program execution and return. 
¢ Dos memory allocation. 


For your copy of Super Tools send $54.95 to: 


Sunny Hill Software 
13732 Midvale N., Suit 206 © Seattle, WA 98133 
(206) 367-0650 


Turbo Pascal & Sidekick trademark Borland Int'l. Lotus 1-2-3 
Reg. trademark Lotus Dev. Corp. dBase trademark Ashton Tate. 
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Software 


$50 FORM & SCREEN PAINTER 
FOR dBASE, BASIC & TURBO 
100,000 copies shipped with dBASE Il, 
now on PC & MSDOS. “Paint” 
prompts, data fields, lines, boxes where 
you want them and ZIP® writes dBASE 
l/l, BASIC or Turbo Pascal code. Then 
add one line to your programs for pro- 
fessional data entry and reports. $50 
cash, check, or VISA, no COD. 
MAGNUM DATA INC. 

627 South Plymouth Blvd. 

Los Angeles, CA 90005 

(213) 937-0808 


Quality Software 

at Giveaway Prices! 

We have to clear lots of CP/M & 
MSDOS software. Many 75% off list 
price. Source for many. Thousands of 
5-inch & 8-inch diskettes—under $1 
ea. “Everyman's Database Primer” / 
“dBase Il for Every Business” —$7.50 
ea. + $2 S/H. 

Software Salvage 

Box 640 

Norwalk, CT 06856 


DBase II User—Converting to ‘’C’’ 
Try the dBx translation system— from 
DBase Il to quality “C”; incl. translator, 
screen handler, & sort (w/source)— 
uses any file handler. For MSDOS, 
XENIX & UNIX Sys 5. 

Desktop Al 

Box 640 

Norwalk, CT 06856 


FED “Binary File Editor”’ 

Allows the user direct access in both HEX 
and ASCII format to any disk file on the IBM 
PC. FED can patch object modules, exam- 
ine word processing files, repair damaged 
files and verify the results of I/O operations. 
S/S DOS disk for 128 IBM PC. Only $49° + 
$5 s/h". 

The Whitewater Group 

2912 N. Burling Avenue 

Chicago, IL 60657 

(312) 975-6095 


TECMAR GRAPHICS LIBRARY 


TEKMAR lets you do high-res graphics 
on your TECMAR Graphics Master. Fea- 
tures windowing, viewporting, clipping, 
axis rotation. Similar to Tekronix graph- 
ics. Includes screen dump/restore. Ep- 
son screen print, support for HP and 
Western Graphtec plotters. Includes 
three curve-fitting programs and graph- 
ics application SOURCE CODE. Requires 
MS-FORT 3.20, or Lahey F77L. 

Price: $195. 
ADVANCED 
CONSULTANTS, 
18653 Ventura Boulevard, Suite 351, 
Tarzana, California 91356 

(818) 407-1059 


SYSTEMS 
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ECLIPSE SYSTEMS 


AZTEC C65 + ProDOS 

Use Aztec C DOS 3.3 software under Pro- 
DOS. Run programs without relinking. Sys- 
tem includes recursive Shell, support for 
pseudo-code, vi like editor with macros, li- 
brary upgrade and source code. Requires 
ProDOS user's disk. $49.95. 

Eclipse Systems, 223 Matthew Rd., Marion, 
PA 19066. (215) 667-8354 


SOFTWARE SENTINEL 
A hardware key that prohibits unau- 
thorized use of software. Its benefits: 
Unlimited backup copies; unbreakable; 
site licensing control; no floppy re- 
quired with hard disk; transparent; 
pocketsize. Evaluation Kit available. PC 
compatible. 
Rainbow Technologies, Inc. 
17971 Skypark Circle, Suite E 
Irvine, CA 92714 (714) 261-0228 


DBase II User—Converting to ‘‘C’’? 
Try the dBx translation system—from 
DBase Il to quality “C”; incl. translator, 
screen handler, & sort (w/source)— 
uses any file handler. For MS-DOS, 
XENIX & UNIX sys 5. 
Desktop Al 
Box 640 
Norwalk, CT 06856 


Utility 


PRODUCE ASSEMBLY CODE FAST! 
Basic XPL is a high-level assembler 
with source code portability between 
CP/M and PCDOS. Complete with de- 
tailed 65-page manual. Satisfaction 
guaranteed. Send $79 check to author: 
Gary D. Campbell 

205 Sunbird Cliffs Lane 

Colorado Springs, CO 80907 


**Pascal’s Friend** 
PASCAL'S FRIEND v. Il contains source 
code for use with IBM PC Turbo Pascal: 
1-2-3 style menu routines, keyboard 
handling, save and restore screens, 
read disk directory or any track and 
sector, system clock and calendar rou- 
tines, write strings in any attribute, 
DOS funcion calls and MORE! 

J. S. Computing 
815N. 12th St. 

Suite 5 

Allentown, PA 18102 
(215) 821-9020 
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Mac Toolbox Listing  disting 


Continued, text begins on page 94) 


char wr_icmd, fillb; /* initiator command */ 
char wr_mode, fi ite s /* ncr5380 mode */ 
char wr_temd, rita /* target command */ 
char wr_sele, fille; /* select enable */ 
char wr_send, fillf; /* start send operation */ 
char wr_trec, fillg; /* start target recieve */ 
char wr_irec, fillh; /* start initiator recieve */ 
char £11190, rd_data; /* current scsi bus data */ 
char £11191, rd_icmd; /* initiator command status */ 
char £11182, rd_mode; /* ncr 5388 mode */ 
char £11193, rd_tcmd; /* target command status */ 
char £11104, rd_bstat; /* current bus status */ 
char £11105, rd_stat; /* chip bus and status info */ 
char £11106, rd_input; /* input data */ 

char £11197, rd_reset; /* reset strobe */ 

a 

/* 

a defines TCMD BSTAT 

* 

#define P_DOUT @x@B /* @x6B data out */ 

#define P_DIN Qxl /* 9x64 data in */ 

#define P_CMD GxB2 /* ®x68 command */ 

#define P_STAT @x@3 /* ®x6C status */ 

#define P_MOUT @x@6 /* 6x78 Message Out */ 

#define P_MIN 9x07 /* 9x74 Message In */ 


* 


* Global for drive size for use by format routine 
me 
long ScsiDrvSize = 4, * 17L * 153L; 
/* 
* ScsiReset -- assume this is the only host adapter in system and do 
* a hard reset of the buss and controllers. 
ry 
ScsiReset() { 
LONG CHET 
register zero = @; 
register struct NCR538@ *ncr = @x580000; 
ncr->wr_data = zero; 
ncr->wr_mode = zero; 
ncr->wr_tcmd = zero; 
ncr->wr_icmd = @x8@; 


for (cntr=8x49000;cntr>@:cntr--); 
ncr->wr_icmd = zero; 


} 
/* 


* ScsiCmd - Select the target controller 9, build and transfer 

* the command block. 

= 

ScsiCmd(opcode,lun,blk,len,ctl) { 

struct scsicmd cmd; 
long cntr; 
register zero = Q; 
register struct NCR538@ *ncr = 
register char *ptr; 


Ox5 00000; 
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(Continued on next page) 
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Ma C Toolbox (Listing Continued, text begins on page 94) 


Listing One 
ncr->wr_tcmd = zero; /* select controller */ 
ncr->wr_data = 1; 
ncr->wr_icmd = @6x@5; 


for (cntr=O8x408@00:cntr>O && (ncr->rd_bstat & 9x48) == zero;cntr--); 
ncr->wr_icmd = zero; 


cmd.sc_cmd = opcode; /* build scsi command block */ 
cmd.sc_adrH = lun<<5; 
cmd.sc_adrM = blk>>8; 
cmd.sc_adrL = blk; 
cmd.sc_arg = len; 
cmd.sc_vendor = ctl | 1; /* force XEBEC ST596 Halfstep */ 
ScsiOut (6,&cmd,P_CMD) ; /* send cmd to ctlr */ 
/* 
* ScsiOut/ScsiIn - transfer bytes on data bus with reg/ack handshake 
* In the interest of speed we ignore edge following, the controller 
* will respond within a microsecond or so during a particular phase. 
* The rest of the loop is unfolded and optimized for the Aztec C 
* compiler to generate 9 memory references per byte. Best case would 
* 


be 7 memory references. 
* 


ScsiOut (len, ptr, phase) 
register char *ptr; 


{ 

register high = @xll; 

register long low = 6x@l; 

register char *i,*d; 

register zero = 8; 

register struct NCR5380 *ncr = 9x500000; 

ad = &ncr->wr_data; 

i = &ncr->wr_icmd; 

ncr->wr_tcmd = phase; 

ncr->wr_icmd = @x@l; 

do 
while((ncr->rd_bstat & 0x29) == zero); /* sync with reg */ 
if ((ncr->rd_stat & @x®@8) == zero) break; /* if done *#/ 
*qd = *ptr; ptrt+=low; *i = high; *i = low; 
*q = *ptr; ptrt=low; *i = high; *i = low; 
*d = *ptr; ptrt+=low; *i = high; *i = low; 
*qd = *ptr; ptrt=low; *i = high; *i = low; 
*qd = *ptr; ptrt=low; *i = high; *i = low; 
*qd = *ptr; ptrt=low; *i = high; *i = low; 
while((ncr->rd_bstat & @x2@) == zero); /* sync with req */ 
if((ncr->rd_stat & @x@8) == zero) break; /* if a cmdblk */ 
*qd = *ptr; ptrt=low; *i = high; *i = low; 
*q = *ptr; ptrt+=low; *i = high; *i = low; 

} while ((len -= 8) > @); 

ncer->wr_icmd = zero; 

, return(@); 


ScsiIn(len,ptr, phase) 
register char *ptr; 


register high = @x19; 
register long one = @x@l:; 
register char *i,*d; 
register zero = @Q@; 
(Continued on page 104) 
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Quelo® 68000 ecu 


Tools 
68000/68010 Assembler Package 


Assembler, linker, object librarian and extensive indexed — 
typeset manuals. 


Conforms to Motorola structured assembler, publication 
M68KMASM{4]. Macros, cross reference and superb load 
map, 31 character symbols. 


Optimized for CP/M-80, -86, -68K, MS-DOS, PC-DOS .$ 595 
Portable Source in ‘‘C"’ until Nov. 1, 1985 
after Nov. 1, 1985 


Lattice® 68000 “C’’ Cross Compiler 
and Quelo 68000/68010 Assembler Package 


Optimized for MS-DOS 


68200 Assembler Package 
Optimized for CP/M-80. MS-DOS, PC-DOS 


68020 Assembler Package 
First release Sept. 15, 1985 for MS-DOS 


Quelo Inc. 

2464 33rd W. Suite #173 
Seattle, WA 98199 
Phone (206) 285-2528 
COD, Visa, MasterCard Telex Il (TWX) 910-333-8171 


CP/M, tm DRI.MS-DOS tm Microsoft. Lattice, tm Lattice Inc. 


For more information contact 


Patrick Adams 
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Disk iE 


3 Dysan 


TYPE BOX OF 10 


5’°-SS/DD-48 TPI 19.50 
5"'-DS/DD-48 TPI 25.50 
5"-SS/DD-96 TPI 29.50 
5"-DS/DD-96 TPI 37.50 
5”-DS/DD-IBM/AT 52.95 
8°-SS/SD-48 TPI 23.95 
8°-SS/DD-48 TP| 25.50 
8°-DS/DD-48 TPI 29.95 
3.5°-SS/DS 32.95 


Available Soft or Hard Sector 
For Plastic Case Add 1.25/Box 
Plus Tax & Shipping 
Cash, Visa, Mastercard, COD 
Integral Systems Corp. 
2900-H Longmire Drive 
College Station, TX 77840 
(409) 764-8017 
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AT LAST — 
A handbook that contains the Programming 
Codes for 100’s of popular printers. 


Announcing: 
PROGRAMMERS’ HANDBOOK OF 


COMPUTER PRINTER COMMANDS 


The handbook gives you: 
Codes for printers made by over 40 Printer 
Manufacturers. 
Easy to use spiral bound book of over 250 pages 
of Programming Codes written in table form. 
Codes arranged by Written Code, Hex and Decimal 
equivalent, and with a brief description of what 
each code does. 
Codes for either Daisy-Wheel or Dot Matrix Printers 
(models through 1984). 
ONLY $37.95 + $2 shpg./hdlg. ppd. 
with a two week approval guarantee. IF NOT 
SATISFIED, return in original carton for refund of 
book price only. 
FOR MORE INFORMATION OR TO ORDER 
CALL OR WRITE: 


INCORPORATED 
(812) 876-7811 (9-5 EST) 
P.O. BOX 596, ELLETTSVILLE, IN 47429 gums 


We accept MC, VISA, MO—same day shpg. _ VISA 
COD—$2 extra. CKs—Allow extra 14 i ee 
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Tree Shell 


A Graphic 

Visual Shell for SX 
Unix/Xenix 
End-Users and 
Experts Alike! 


Dealer 
inquiries 
welcomed. 


Coehrmere 


“A Higher Form of Software” 
24000 Telegraph Road 
Southfield, MI 48034 
(313) 352-2345 
TELEX: 33658 COGITATE USA 


TRUE SPEECH 

CAPABILITY 

FOR THE IBM PC! 

The DIALOG ; 

Voice System 

digitizes speech in 

real time, stores it 

on disk, and plays it back 

on command. Each board comes 

complete with the software drivers to hook our 
hardware to the applications program of your choice. ~~ 


WHAT WILL IT DO FOR ME? 

Applications include verbal annotation of text, electronic mail and 
messaging, intelligent phone management, telemarketing, and remote 
data entry. Dialogic provides the optimum speech I/O “engine” for the 
IBM PC world. 


HOW DO I GET ONE? 

DIALOG/1, the basic model, is priced at $295. DIALOG/2, with an intelli- 
gent phone interface and touch-tone decoding, is $495. DIALOG/3, with 
modem, is $595. Each board comes with a detailed user's manual, disk- 
ette, with the software drivers, and demo package. py}a 


Call or write us for 
detailed specifications: 
DIALOGIC CORPORATION, 60 Baldwin Road 


Parsippany, NJ 07054 (201) 334-8450 


Demo Line (201) 334-1268 


Talk back. With DIALOGIC. 
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IC. PROMPT DELIVERY!!! 


SAME DAY SHIPPING (USUALLY) 
OUTSIDE OKLAHOMA: NO SALES TAX 


8087-3 MATH $125.00 
8087-2 COPROCESSORS 150.00 
DYNAMIC RAM 
256K 256Kx1 120ns 
256K 256Kx1 150 ns 
64K 64Kx1 150ns 

EPROM 

27C256 32kx8 250ns 
27256 32kx8 250ns 
27128 16Kx8 250ns 
27C64 ~—s 8Kx8- 200 ns 
2764 8kKx8 250 ns 
2732A 4Kx8 250ns 

STATIC RAM 
6264LP-15 skxs 150 ns 
6116LP-3 2kxs 150 ns 


OPEN 62 DAYS: WE CAN SHIP VIA FED-EX ON SAT. 


MasterCard/VISA or UPS CASH COD p 
noextra| Factory New, Prime Parts Ur'co 


costoN | MICROPROCESSORS UNLIMITED 
DELIVERY 24,000 S. Peoria Ave., (91 8) 267-4961 


BEGGS, OK. 74421 


Prices shown above are for x Benguss 5, 1985 
Piease call for current : Please expect higher or lower prices on 
& insurance extra. Cash 
be delivered to you by the next 

Sor Priotty One @ $15.00! 


$73.10 


640 Kbyte MOTHERBOARD KIT: IBM PC/XT 
QUANTITY ONE PRICES SHOWN 


Zenith 150 & 100, Compaq Portable & Plus: 





No source code for 
your REL files? 


REL/MAC 


converts a REL file in the Microsoft™ 
M80 format to an 8080 or ZILOG™ Z80 
source code MAC file with insertion of all 
public and external symbols. 

@ REL/MAC makes MAC source files 

@ REL/MOD lists library modules 

e@ REL/VUE displays the bit stream 

@ REL/PAK includes all of the above 

@ 8080 REL/MAC demo disk $10.00 


REL/PAK for 8080 only 
REL/PAK for Z80 & 8080 
on 8"SSSD disk for CP/M™ 2.2 


Send check, VISA, MC or C.O.D. to 


[SE MicroSmii 
COMPUTER TECHNOLOGY 


PO. BOX 1473, ELKHART, IN 46515 
1-800-622-4070 
(Illinois only 1-800-942-7317) 


NOW C HERE! 


CROSS SOFTWARE 
for the NS32000 


Also Available for IBM PC 
INCLUDES: | 


* Cross Assembler * 
* Cross Linker * 
* Debugger * 
* N.S. ISE Support * 
*x Librarian * 
* Pascal Cross Compiler * 
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Ma C Toolbox (Listing Continued, text begins on page 94) 
Listing One 


register struct NCR538@ *ncr = Ox500008; 


d = &ncr->rd_data; 

i = &ncr->wr_icmd; 

ncr->wr_tcmd = phase; 

ad. { 

while((ncr->rd_bstat & @x2@) == zero); 
if ((ncr->rd_stat & 8x@8) == zero) break; 
*ptr = *d; ptrt+=one; *i = high; *i = zero; 
*otr = *d; ptr+=one; *i = high; *i = zero; 
*¥ptr = *d; ptrt+=one; *i = high; *i = zero; 
*ptr = *d; ptrt+=one; *i = high; *i = zero; 
*ptr = *d; ptrt+=one; *i = high; *i = zero; 
*ptr = *d; ptrt+=one; *i = high; *i = zero; 
*ptr = *d; ptrt=one; *i = high; *i = zero; 
*ptr = *d; ptrt=one; *i = high; *1 = zero; 
} while ((len -= 8) > @); 
return(@); 
} 
/* 
* ScsiStat - get the last two bytes to finish a command sequence 
*/ 
ScsiStat() { 

register zero = Q; 

register struct NCR5388 *ncr = Q2x500089; 

register char *ptr; | 

short stat; 

ptr = &stat; 

ncr->wr_tcmd = P_STAT; 

while((ncr->rd_bstat & 8x28) == @); 

*#ptr++ = ncr->rd_data; 

ncr->wr_icmd = 9x1Q@; 

ncr->wr_icmd = zero; 

ncr->wr_tcmd = P_MIN; 

while((ncr->rd_bstat & @x2@) == 0); 

*ptr++ = ncr->rd_data; 

ncer->wr_icmd = 0x10; 

ncr->wr_icmd = zero; 

ner->wr_tcmd = zero; 

return(stat) ; 

} 

ft 
go -- Do a default drive format (ST506) 
* 

ScsiFmt() f{ 

Scsicmd (0x04,0,08,12,0); /* issue format command */ 
return (ScsiStat()):; /* xrceturn status */ 
/* 

* ScsiRead and ScsiWrite -- do the I/O for a specified sector 
io the related data. 
* 


ScsiRead(sector,data) 
char *data; 
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Scsicmd(0x®8,08,sector,1,0); 
ScsiIn(512,data,P_DIN); 
return(ScsiStat()); 

. 

ScsiWrite(sector,data) 

char *data; 

{ 
ScsiCmd(9x9A,8,sector,1,9); 
ScsiOut (512,data,P_DOUT) ; 
return(ScsiStat()); 


ie 
* 


PO Box-1456, Cupertino, CA 956814 


+ Ft et eH HF FF eH He 


* 
™N 


Struct Volume { 


short drSigword; 


/* 
/* 


MacSCSI non-partitioned format routine, 
This version was developed on the Mac under Aztec C, 


/* 


issue read command */ 
transfer in data */ 
/* return status */ 


issue write command */ 
transfer out data */ 
/f* return status */ 


Copyright 1985 by John L. Bass, DMS Design 


Right to use, copy, and modify this code is granted for 
personal non-comercial use, provided that this copyright 
disclosure remains on ALL copies. Any other use, reproduction, 
or distribution requires the written consent of the author. 


Sources are available on diskette from Fastime, PO Box 12598 
San Luis Obispo, Ca 93486 -- (885) 546-9141. Write for ordering 
information on this and other Mac products. 


should be SD2p7 */ 


(Continued on next page) 





Where did ATsT and 
SONY find the Tools 


to C them thru? 
The Application Programmer’s Toolkit!!! 


A Wizard! Ware” product from Shaw: American Technologies 


APT™ provides you with everything you need to 
increase your C programming productivity, including: 


@ COMPLETE SOURCE CODE (over 5000 lines!) 

@ File handling with direct & keyed access 

© Screen and Report Generators, with full screen handling for your programs 

® Generic Terminal Driver for portable code 

® String math functions, and string manipulation routines 

@ Reference Manual on Disk (over 50 pages) 

@ Tutorial Manual (over 25 pages) with Source for Mailing List Manager 

@ A host of useful Utilities, Database and File Editors 

® Available for Microsoft (3.0), Lattice, Mark Williams, DeSmet, BDS, Aztec, CI-C86 
C-STARTER Toolkit!: Binary APT, DeSmet C, “Programming in C on the IBM-PC” 


NOW MORE AFFORDABLE!! 


C'S Ss 
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BET BR Se CORBIS eich ae Sok Baie eri ERS Oh oie $395 
APT/DeSmet C & BDS C versions........................ $295 
C-Starter (binary APT, DeSmet Compiler and Book)......... $295 
RPE GN BNE os 2 cS tare CESS Se ee Dn Cas $ 45 
** NEW PRODUCTS! Available Now or Coming Soon: ** 
ADAPT: English-language, applications generator........... $295 
BIZ-WIZ: Comprehensive Accounting Package.............. $495 
FLORA: Graphics Toolkit, with MAC-like capabilities........ $ 95 


APT-WINDOWS!: APT-Compatible/stand-alone window mgt.!..% 95 
db2c: dBaselII/III TO C Source Code Translator and Libraries!. CALL 
Dr. Shaw’s DOS-Shell: a UNIX-like shell for DOS ........... $ 95 
. te oa & Microsoft CBcroeots, Lat C/Lai oe ne MWC86/Mark Williams C: Des: are 


ce 3 / 0. met C/C W: . CI Computer Innovations, BDS C/BD Software, 
¢, UNIX, AT&T/AT&T. SOD y Corp., Macintosh/Apple Com yuter, & dBaselll Reheo Tate. ADAPT Wilm: Syste e 
izardWare, APT, C-Starter/Shaw American Technologies’ 7 ™ —— 


Call (502) 583-5527 
Shaw >: American Technologies 
Wezard Ware’ 


ft 
LORA, Biz-Wiz, W! 
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Waste Time? 


Let SCRIO™ do the 1/0 for you. 
A LATTICE -C- SCREEN DEFINITION UTILITY 


® Monochrome or color @ IBM PC and Compatibles 
© Full Attributes @ DOS 2.0 or Greater 
Specifically, SCRIO can design screens for: 


® Menus 
e [nput Forms 







@ Information Displays 
@ Any Combination of the Above 







Screen Definitions Are Done At Run Time 
No Need Tb Recompile 


A licensing agreement for including 
SCRIO in commercial programs is available. 
The price of $249.00 includes software and 
documentation manual. 


DELTA HEALTH SYSTEMS, INC. 
1220 Potter Drive, PO Box 2638 
West Lafayette, IN 47906 
(317) 463-1936 


Trademark of Lattice, Inc. 
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Ma C Toolbox Lis ting (Listing Continued, text begins on page 94) 


+4 


struct 
char 
long 


main() { 


long drCrDate; /* date and time of initialization */ 

long drLsBkUp; /* date and time of last backup */ 

short drAtrb; /* volume attributes */ 

short drNumFls; /* # of files in file directory *#/ 

short drDirSt; /* first logical block of file dir es 

short drBlLen; /* # of logical blocks in file dir */ 

short drNmAl1Blks; /* # of allocation blocks on volume *#/ 

long adrAlB1kSiz; /* size of allocation blocks */ 

long drClpSiz; /* # of bytes to allocate */ 

short drAl1B1St; /* logical block number of first 
allocation block */ 

long ArNxtFNum; /* next unused file number */ 

short drFreeBks; /* # of unused allocation blocks */ 

char drvVN; /* length of volume name */ 

char drFill[512-37]; /* volume name & start of alloc. map */ 


Volume v;3 


zeros[512]; /* block worth of nulls */ 
ScsiDrvSize; /* number of 512 byte sectors */ 
char *p; 
int i; 


#ifdef hack 


#endif 
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printf("Scsi reset\n") ; 
ScsiReset(); 
printf("Drive being formatted\n"); 
if (ScsiFmt()) { 

printf ("Format Failed\n") ; 


exit(1); 
v.drSigword = §xd2d7; 
v.drCrDate = v.drLsBkUp = 8; 
v.drAtrb = Q; 
v.drNumFls = @; 
ve drNxtFNum = 1; 
v.<drDirSst = 4: 
printf("Directory Start: $6.6d\n",v.dadEDirst); 
v.drBlLen = 28: 
printf ("Directory BlkLen: $6.6d\n",v.drBlLen) ; 


v.drAlB1St = v.drDirSt + v.drBlLen; 
printf("First Allocation Blk: %6.6d\n",v.drAlB1St) ; 


v.drAlBlkSiz = 512L * (ScsiDrvSize/640L + 1L); 
V.drCipsiz «= vsdrALBLkSiz; 
printf("Allocation BlockSize: %6,61d\n",v.drAl1B1lkSiz) ; 


v.drNmA1IBlks = (ScsiDrvSize-v.drAlB1St)/(v.drAlB1kSiz>>9) ; 
v.drFreeBks = v.drNmAl1Blks; 
printf("Allocation Blocks: %$6.6d\n",v.drNmAl1Blks); 


for(v.drVN = 8,p="MacSCSI";*p;pt+) v.drFill[v.drVN++] = *p; 
printf ("Initializing Drive\n"); 


ScsiWrite(@,zeros); 


ScsiwWrite(l,zeros); 
(1, )? (Continued on page 109) 
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Conix 


NOW ONLY $79.95! 


If you think you're missing out on innovative software 
developments because at is writing for CP/M'M-80, take 
a look at us. We've adapted UNIX™ features to CP/M like 
never before, and with the kind of professional, quality- 
controlled product that you deserve. That product is none 
other than the critically acclaimed ConlX Operating System. 


ConlX can provide any 48K+ CP/M-80 or compatible system 
with I/O Redirection and Pipes (uses ens or disk), 
perfected User Areas, Command and Overlay Path Searching. 
Auto Screen Paging. 8Mb Print entering. 22 new SysCalls, 
Function Keys, ‘Virtual’ disk system, Archiver (saves over 
50% disk), extensive command anguane. 300+ variables, 100+ 
commands, pull-down menu, and much more! Uses as little as 
1/2K RAM! Runs with CP/M for true data and software 
compatibility. Installs easily without any system mods! 


The ConIX package lists at $165 and has been advertised and 
sold internationally to many enthusiastic customers since 
October 1983. As a special limited offer, we've lowered the 

rice of the complete ConIX yom by 50% to | $79.95! 
Bon't miss this oppormny to bring your 8-bit micro back into 
the software revo 
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ution. Order your copy of ConIX today! 


Price includes manual, 8°’ disk, and user support. 54'’ conversions 

available. Contact your local dealer, or buy direct and add shipping: 

$4.50 UPS, $10 Canada. $25 overseas. NY residents add sales tax. 
P.O. Box 680 Parkchester Station. NY 10462 


4 Tel. (212) 652-1786 (for information/orders) 


‘‘We're helping your computer work better for you!"’ 
UNIX: AT&T Bell Labs, CP/M: Digital Research, ConIX: Computer Helper Ind. 


Computer Helper Industries Inc. 
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C Tools for PC-DOS and MS-DOS 


PROFESSIONAL C UTILITIES 

If you are looking for a great 
implementation of vi, make, lint, or 
a professional screen generator at an 
affordable price, your search is ended. 
At $125 each the following utilities 
offer what we believe to be the best 
software value available. At 2 for 
$200, 3 for $300, and all 4 for $350 
the savings are appreciable. 

What if you don’t agree after pur- 
chase that you’ve received good val- 
ue? Then send what you don’t like 
back and get a refund (see Return 
Policy). 

SunScreen & Lint work with Aztec 
C, Computer Innovations C, and Lat- 
tice C. “Z” and UniTools work with 
any 8086 C Compiler. 


— 


































UniTools make, diff, & grep .... $125 
| Create a control file that defines the 

Operations and dependencies for creating 
a module. When you need to recreate 
the module simply execute make. Based 
on time and dates on files, make decides 
which modules to compile or assemble, 
which utilities to execute, and which 
parameters to use. 





























RETURN POLICY 
All software is returnable within 30 
days for refund. Shipping costs are 
not refundable. A small restocking fee 
may be charged. Only items shipped 
within the USA can be returned. 





















DISCOUNTS 
Order 2-3 items for a 20% discount 
(cost is $100 per item), 4-7 for a 
25% discount ($93.75), 8 or more for 
a 30% discount ($87.50). 









SunScreen ................... $125 


@ Powerful utility for producing pro- 
fessional looking input/output 
screens. 

Simplifies maintenance 

Works with color and mono 

Field by field editing options 

Free format or column format 
Cursor left/right/up/down 

Split and multiple screens 

On screen error messages 
Produces C modules 

Build libraries of stock screens 














TO ORDER 
Call 1-800-TECWARE (1-800-832- 
9273). Call 201-530-7997 from NJ 
or outside USA. Orders can be 
payed by COD, VISA, Master Card, 
or American Express. One and two- 
day delivery available at an addi- 
tional charge. Delivery outside the 
USA is $10 + 2% of order. 






“LL. VeQtO oes 3 $125 


Based on the Berkeley vi editor 
Terse, powerful commands 
Create new commands via macros 
Undo last command 

Sophisticated pattern matching L 
Sophisticated search/replace a rd oy, Ae ee et ed 
Automatically indents C programs Lint analyzes programs for datatype 
Remembers operands errors, subroutine argument errors, 
Ctags portability problems. 


























Orders may also be sent to: 
Manx Software Systems, P.O. Box 55, 
Shrewsbury, NJ 07701 
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1 BOUND VOLUME a 






TINUING THE TRADITION : 


DR. DOBB’S JOURNAL > 
ANNOUNCES THE RELEASE OF 
BOUND VOLUME 8 


Bee ap es — in one source 


increased in size in 1983, this volume is bigger and better that ever. 


Vol. 1 1976 

The material brought together in this volume 
chronicles the development in 1976 of Tiny BASIC 
as an alternative to the ‘‘finger blistering,”’ front- 
panel, machine-language programming which was 
then the only way to do things. This is always 
pertinent for the bit crunching and byte saving, 
language design theory, home-brew computer 
construction and the technical history of personal 
computing. 

Topics include: Tiny BASIC, the (very) first word on 
CP/M, Speech Synthesis, Floating Point Routines, 
Timer Routines, Building an IMSAI, and more. 


Vol. 2 1977 

1977 found DDJ still on the forefront. These issues 
offer refinements of Tiny BASIC, plus then state-of- 
the-art utilities, the advent of PILOT for 
microcomputers and a great deal of material 
centering around the Intel 6080, including a 
complete operating system. Products just 
becoming available for reviews were the H-8, KIM- 
1, MITS BASIC, Poly Basic, and NIBL. 

Articles are about Lawrence Livermoore Lab's 
BASIC, Alpha Micro, String Handling, Cyphers, 
High Speed Interaction, |/O, Tiny Pilot & Turtle 
Graphics, many utilities, and even more. 


Vol. 3 1978 

The microcomputer industry entered into its 
adolescence in 1978. This volume brings together 
the issues which began dealing with the 6502, 
with mass-market machines and languages to 
match. The authors began speaking more in terms 
of technique, rather than of specific 
implementations; because of this, they were able 
to continue laying the groundwork industry would 


follow. These articles relate very closely to what is 
generally available today. 

Languages covered in depth were SAM76, Pilot, 
Pascal, and Lisp, in addition to RAM Testers, S-100 
Bus Standard Proposal, Disassemblers, Editors, and 
much, much more. 


Vol. 4 1979 

This volume heralds a wider interest in 
telecommunications, in algorithms, and in faster, 
more powerful utilities and languages, innovation 
is still present in every page, and more attention is 
paid to the best ways to use the processors which 
have proven longevity—primarily the 8080!IZ80, 
6502, and 6800. The subject matter is invaluable 
both as a learning tool and as a frequent source of 
reference. 

Main subjects include: Programming Problems / 
Solutions, Pascal, Information Network Proposal, 
Floating Point Arithmetic, 8-bit to 16-bit 
Conversion, Psuedo-random Sequences, and 
Interfacing a Micro to a Mainframe—more than 
ever! 


Vol. 5 1980 

All the ground-breaking issues from 1980 in one 
volume! Systems software reached a new level 
with the advent of CP/M, chronicled herein by 
Gary Kildall and others (DDJ's all-CP/M issue sold 
out within weeks of publication). Software 
portability became a subject of greater import, and 
DDJ published Ron Cain’s immediately famous 
Small-C compiler—reprinted here in full. 

Contents include: The Evolution of CP/M, a CP/ 
M-Flavored C Interpreter, Ron Cain's C Compiler 


: DD4J turns pro. ‘Some of the most : Rowertel professional programmer’ s tools ever published in amagazine are in this 
volume. Jim Hendrix’ S Small C compiler. Ed Ream’s RED screen editor. A microcomputer subset of the Defense 
Department's official programming language, Ada. C and Forth and 68000 software. Because the magazine 





for the 8080. Further with Tiny BASIC, a Syntax- 
Oriented Compiler Writing Language, CP/M to 
UCSD Pascal File Conversion, Run-time Library for 
the Small-C Compiler and, as always, even more! 


Vol. 6 1981 

1981 saw our first all-FORTH issue (now sold out), 
along with continuing coverage of CP/M, small-C, 
telecommunications, and new languages. Dave 
Cortesi opened ‘‘Dr. Dobb’s Clinic’ in 1981, 
beginning one of the magazine's most popular 
features. 

Highlights: Information on PCNET, the Conference 
Tree, and The Electric Phone Book, writing your 
own compiler, a systems programming language, 
and Tiny BASIC for the 6809. 


Vol. 7 1982 

In 1982 we introduced several significant pieces of 
software, including the RED text editor and the 
Runic extensible compiler, and we continue to 
publish utility programs and useful algorithms. Two 
new columns, The CP/M Exchange and The 16-Bit 
Software Toolbox, were launched, and we 
devoted special issues to FORTH and 
telecommunications. Resident Intern Dave Cortesi 
supplied a year of *’Clinic’’ columns while 
delivering his famous review of JRT Pascal and 
writing the first serious technical comparison of 
CP/M-86 and MSDOS. This was also the year we 
began looking forward to today’s generation of 
microprocessors and operating systems, publishing 
software for the Motorola 68000 and the Zilog 
Z8000 as well as Unix code. And in December, we 
looked beyond, in the provocative essay, ‘‘Fifth- 
generation Computers.”’ 


Complete your reference library. Buy the entire set of Dr. Dobb’s Journals from 1976 through 1983, Bound Volumes 
1-8, for $195.00. That’s $34.00 off the combined individual prices—a savings of almost 15%! 





Vol. 
YES! LJ Please send me the following Volumes of Dr. Dobb’s Journal. ie 
ol. 
Payment must accompany your order. Vol 
Please charge my: [Jvisa (CJ Mastercard (J American Express Vol. 
| enclose Check/money order Vol. 
Card # Expiration Date Vol. 
Vol. 
Signature All 
Name Address 
(please, no P.O. Boxes) 
City Stale nas 
Mail to Dr. Dobb's Journal, 2464 Embarcadero Way, Palo Alto, CA 
94303 
Allow 6-9 weeks for delivery. 
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0O 


$26.75 = 
paste 
S270 
$27.19 
$27./5 = 
$27.75 = 
$30.75 = 
$31.75 = 
x $195.00 = 
Sub-total $ 


MR PR Oe a LPS OS 


California residents add applicable 


sales tax % 





Postage & Handling Must be Included with order. 


Please add $1.25 per book in U.S. ($4.25 each surface mail 


outside U.S. Foreign Airmail rates available on request.) 


TOTAL $ 





Ma C Toolbox Lis ting (Listing Continued, text begins on page 94) 


if (ScsiWrite(2,&v)) { 
printf("Write of config block failed\n") ; 


for (i=3;i<ScsiDrvSize;it+) if (ScsiWrite(i,zeros)) f{ 
printf ("Write failed at block %d\n",i); 


printf ("Checking Drive\n"); 
for (i=8:i<ScsiDrvSize;i+t+) if (ScsiRead(i,zeros)) { 
printf("Read failed at block %d\n",i); 


printf("Format completed ok\n"); 


main () 
printf ("Exit code %d\n",OpenDriver("\P.MacSCSI") ); 
main () 
{ 
*(int *)@x210 = 5; /* boot drive to MacSCSI */ 
} End Listing 


Due to a lack of space in this issue the listing for the Mac SCSI disk driver 
(np_dvr.c) will be published in the October issue. 





A Professional Quality Z80/8080/8085 Disassembler 
Variable 54, WHEN YOU NEED SOURCE FOR YOUR CODE 


ou need REVAS 3 
Where Are You? x 


Is programming the lastest game of Trivial Pursuits? 
@ |s this the latest listing? 






REVAS interactively helps you: 
Analyse your software for modification 





Wh Ise is this variable changed? 
o Whee ees chieciouesn. © disassemble files as large as 64K 
TSF’s Source Locator helps you stay productive Assign Real labels in the disassembly 
Source code listings: ¢ file identification Insert COMMENTS in the disassembly 
headings & footings ¢ 5 ade 
Seige line oanatiing s Generate a Cross Reference (XREF) listing 
Cross-reference listings: your comments ¢ 
e Assembler, basic, C, Pascal ¢ A 60 page manual shows how the powerful REVAS 
@ usage ® scope ® . . . 
=. command set gives you instant control over I/O to files, 
System cross-reference combining any 
number of files and languages. printer, or console; how to do a disassembly; and even 
how the disassembler works! You get on line help, your 
The Source Locator choice of assembler mnemonics, control of data 
interpretation, and calculation in any number base! 
Introductory Price $29 95 : ki 
For the IBM PC, XT, AT and compatibles DOS 2.0+ REVAS runs in Z80 CPM computers; is available on 
ie el at eee 8’’ SSSD (standard), RAINBOW, and other (ask) formats 
VSeerator o055) & American Express Phone Orders Price: $90.00 (plus applicable tax), Manual only: $15.00 
In Calif. All other calls 
800-543-6277 800-368-7600 (445) 957-0444 
TSF e Dept. A-3 ¢ 649 Mission St. e REVASCO 
San Francisco, CA. 94105 6032 Chariton Ave., Los Angeles, CA90056 
The Software Family Voice: (213)649-3575 | Modem:(213)670-9465 
Circle no. 106 on reader service card. Circle no. 80 on reader service card. 
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by Robert Blum 


The CP/M Exchange RCP/M system 
is available for your use 24 hours a 
day, 7 days a week. Reach it by dial- 
ing (404) 449-6588. 


Goodbye Old Friend 

Effective July 1, 1985 Digital Re- 
search is changing the manner in 
which they support their products. 
Some products, the more fortunate 
ones, will continue to receive support 
in varying levels, while other, older 
and more mature products will no 
longer be supported. 

Product support has been broken 
into four levels. The highest level of 
Support a product can have is level 
“A”, also called priority support. It 
was not explained exactly what this 
means, but I assume that any support 
calls made for a level “A” product 
will be given priority over other calls. 

Level “B” support is active sup- 
port. You may encounter some delays 
in receiving support for level ‘“B” 
products. Priority is given to ques- 
tions submitted on CompuServe; next 
phone calls will be answered; and fi- 
nally letters will be answered. 

Level “C” support is limited to 
questions submitted on CompuServe 
and phone calls. Level ““D” support is 
for mature products that are not ac- 
tively supported. 

What does all this mean? To the 
CP/M Plus user it means that you 
won't be able to call DRI any longer 
expecting to get help, because CP/M 
Plus has been assigned support level 
‘“D”. Effectively, this appears to 
eliminate any further hope of buying 
an unconfigured copy of CP/M Plus. 
I doubt that dealers will continue to 
sell a product that isn’t supported by 
the manufacturer. A few hardware 
manufacturers are still packaging it 
with their machines; hopefully they 
will also be able to support it. 
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Fortunately for the one million or 
so of us using CP/M 2.2, it was as- 
signed to level “C” support. Some 
time still remains for the once most 
popular operating system for micro- 
computers. When support is finally 
dropped on CP/M 2.2 I doubt that 
any great impact will be felt. There 
are hundreds of reference books 
available for it and a good supply of 
heavily experienced programmers 
knowledgeable on the system. 


AMPRO Little Board 

In the May 1985 issue of DDJ Richard 
Conn reviewed the AMPRO Little 
Board and Bookshelf Computers. 
Since the electronic version of this col- 
umn is running 24 hours a day on an 
AMPRO Little Board, I have decided 
to offer some impressions of this com- 
puter that I have formed as a user. 

Measuring a mere 5%4-inches X 
7¥%4-inches, the AMPRO Little Board 
is a complete 64K Z-80 computer on 
a single board. Its size, in fact, is the 
same as a mini-floppy disk drive; the 
mounting tabs on the board are 
spaced to match the mounting holes 
on any standard drive. The input/ 
output facilities include two asyn- 
chronous serial RS-232 ports, a Cen- 
tronics compatible parallel interface, 
and a single chip floppy disk control- 
ler capable of handling up to four 5'4- 
inch drives. To round out the package 
is a well-implemented CP/M 2.2 en- 
hanced by ZCPR3 and a large set of 
utility programs. 

All that remains to form a com- 
plete system is to supply a meager 5 
watts of power, a CRT terminal at- 
tached to one of the serial ports, and 
mini-floppy disk drives of your 
choice. Finally, a cabinet would prob- 
ably be desirable to provide protec- 
tion for the delicate components. 

If your need for external storage 





exceeds that provided by the floppy 
disk drives, a SASI/SCSI peer buss 
daughter board is available as an op- 
tion. This board, along with an up- 
dated BIOS and several utility pro- 
grams, will allow a hard disk to be 
attached to the Little Board. When 
used, this option can account for up 
to 20 Mb of additional storage. 

I don’t pretend to be an electrical 
engineer and I don’t have any inside 
information from the people who de- 
signed the Little Board. It’s apparent 
to me, however, that the principles of 
reliability and cost effectiveness were 
held above all others when this com- 
puter was designed. 

The component density, ICs per 
square inch of board space, is far less 
than what I am accustomed to. Even 
though this is not documented, I be- 
lieve that forced air cooling of the 
Little Board is not necessary if ade- 
quate air circulation and normal 
room temperature is maintained. 
Better yet, if a cabinet with forced air 
cooling is used, component life should 
not be adversely affected by tempera- 
ture extremes. And, even when the 
board is attached directly to the bot- 
tom of a floppy disk drive, heat 
should not be a problem. 


Serial Interface 
The Z80 Dual Asynchronous Receiv- 
er/Transmitter (DART) is used to im- 
plement the two serial ports. This de- 
vice is the little brother to the Z80 
SIO. They are practically identical in 
all ways including software program- 
ming. So similar, in fact, that they can 
be interchanged in the same socket. 
The difference that exists between the 
two is the DART’s inability to handle 
synchronous transmission protocols 
such as BI-SYNC and SDLC. 
Operation and setup of the DART is 
handled completely through software. 
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Programming is accomplished by 
loading the desired transmission pa- 
rameters into one or more of the five 
write registers contained on the chip. 
For instance, the common transmis- 
sion characteristics of word length, 
number of stop bits, and baud rate are 
all completely programmable through 
software by loading the proper values 
into write registers four and five. The 
more advanced features, enabling in- 
terrupts and setting interrupt vectors, 
are handled in like manner. 

Both serial channels can be pro- 
grammed for a full range of baud 
rates. Channel A can be used up to a 
maximum of 38.4K baud, which to 
my knowledge is fast enough to drive 
any commercially available CRT at 
its maximum rate. Channel B is lim- 
ited to 9600 baud, however. Never- 
theless, I don’t think the lower baud 
rate will present any practical limita- 
tions since most auxiliary devices, 
modems and printers, are unable to 
receive data faster than at 9600 baud. 

The otherwise complete serial sec- 
tion is limited, however, by the num- 
ber of signal lines that are brought 
out to the mating connector. In addi- 
tion to the input and output data lines 
and two ground lines, only two con- 
trol lines, one input and one output, 
are made available. In any other than 
the most simple application, a single 
flow control line may prove to be in- 
adequate. 


Parallel Interface 

The Centronics compatible parallel 
interface is implemented with a sin- 
gle 8 input D-type latch. Here again, 
the number of control lines is limited. 
Only the peripheral device busy line 
is brought in for flow control. The 
other control lines, paper empty etc., 
are conspicuously missing. 


Floppy Disk Controller 

The floppy disk controller used on the 
Little Board is the Western Digital 
1770. It is similar to its predecessor, 
the WD179X, but also contains a 
digital data separator and write pre- 
compensation circuity. The most no- 
ticeable change, however, is in its 
size; the WD1770 is completely con- 
tained in a single 28 pin package. 
Only a few years ago several inches of 
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Periscope ... A Direct Hit! 


“A great debugger ... If you’ve been frustrated by 
programs that don’t behave the same for the debugger 
as when running alone, or that crash altogether, you 
should check out Periscope ...”’ 


PC REPORT, Boston Computer Society 











“It works, and works well!! In the first day of use I 
finished up two weeks of problems!! Really ex- 
cellent!!!?? 


Peter Loats, Periscope User 


Periscope’s differences hit home! Its 
breakout switch gives you control, even when in- 
terrupts are disabled. Periscope’s unique power 
helps you solve the difficult problems. Debug device- 
drivers, memory-resident, and non-DOS programs. 


Great for straightening out confused C 
pointers! Using its breakpoint power, you can stop 
on reads and writes to ranges of memory. Stop on 
registers, words, and bytes, too. 


It’s tough. Periscope’s 16K RAM board is write-protected. Runaway 
programs can’t touch crucial debugger code! Examine the system, safely, at 
any time: Periscope saves the interrupt vectors and buffers it uses, then 
restores them when done. It uses ROM BIOS calls for functions except file 
access, So DOS can’t clobber itself. 


It gets you moving. It’s commands are similar to Debug’s, so you'll 
master it quickly. On-line help is there when you need it. You can define the 
windows you want; you can design easy-to-read memory displays. Periscope 
supports C, Assembler, BASIC, and Pascal. Comprehensive symbol sup- 
port gives you a roadmap through memory tying back to your source. 


It’s risk-free. Periscope is backed up by a 30-day, money-back guarantee! 
The board is warranted for a year. Technical Support? You get the best 
there is ... direct from Brett Salter, Periscope’s author! 


It requires. An IBM PC, XT, AT, Compaq, or close compatible; PC- 
DOS, 64K RAM; a disk drive and an 80-column monitor. With two 
monitors, Periscope’s screen is displayed on the monitor not in use. With 
one monitor, a keystroke switches screens. 


It’s power you can afford. At $295, you can afford Periscope’s 
professional power. The system includes the memory board, breakout 
switch, debugger software, manual, and quick reference card. 


Order now! Call toll-free (800) 722-7006 to place your order or to get 
more information. MasterCard/VISA accepted. 


Get your programs up and running; 


uP PERIS E! 
Data Base Decisions/14 Bonnie Lane! Atlanta, GA 30328/ (404) 256-3860 
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tightly packed board space were 
needed to implement a floppy disk 
control circuit. The 1770 represents a 
dramatic reduction in chip count and 
overall board complexity that should 
result in improved reliability. 

If there is a drawback to the Little 
Board disk controller it is its inability 
to control 8-inch drives. At first I 
thought this would be a big problem. 
Then I experienced the over 800K ca- 
pacity of a 96TPI format 54-inch disk. 


Booting Up 
Starting up the Little Board for the 
first time is a snap. After attaching 





that we allow—code, data and stack. 


says is possible on the 8088/8086 chips. 


Mystic Canyon Software 
P.O. Box 1010 
Pecos, New Mexico 87552 


Name 
Address 
City 

L_] Check /Money Order 


Card 


Signature 


Stic Pascal 


Fastest Compiler on Earth—$64! 


Mystic Pascal compiles at 100,000 to over 1,000,000 lines per minute! How? It takes a 
short cut called incremental compilation. Compared to earlier Pascals, the effective 
speed is astronomical. Give the Compile command for a 1000 line program, and you 
probably can’t lift your finger from the keyboard before the compiler flashes—DONE! 


640K of storage not 64K. Are you fed up with being forced to shoehorn your pro- 
grams into 64K? You won't need mystical powers to run your program in the full 640K 


Interactive Pascal. You can enter Pascal statements directly and see the results 
instantly. It works like a Basic interpreter but it’s a true compiler! 


Optimized 8086 Code. Mystic Pascal produces true 8086 object code. The TWO 
code optimizers run in the background so they don’t slow you down. Thanks to 
another breakthrough, our software floating point arithmetic runs faster than Intel 


Real Multi-Tasking Pascal. Advanced programmers may write truly concurrent 
Pascal programs by simply starting Pascal procedures. Up to 100 concurrent pro- 
cedures can communicate by passing messages through queues. 


ISO Standard Pascal. Educators in particular need a truly Standard Pascal for their 
students. And learning is made easier by the Help Windows which describe Pascal. 


Place your order by phone today— 

(505) 988-4214 or mail the coupon. 
Requires an IBM Personal Computer or true 
compatible with 256K. Not copy protected. 


Rush me the Mystic Pascal System with diskette and 75 page manual! 


State Zip 


L-] Visa 


Price is $64 total. CODs and Purchase Orders are NOT accepted. 
Outside US & Canada add $15. Payment must be in US funds on a US bank. 
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the floppy disk drives with a standard 
34 pin ribbon cable, all you need to do 
is to attach a CRT terminal set to 
9600 baud to serial channel A. There 
are no other special requirements. 
Simply insert the CP/M disk into disk 
drive A and hit reset. The standard 
monitor ROM will load the operating 
system from disk and begin its opera- 
tion. Nothing could be easier. 

Once the system is up and running, 
you may want to change the default 
serial port parameters or activate an 
option that automatically loads a 
program at cold start. A reconfigura- 
tion program is provided to enable 































C] Mastercard 
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you to make these changes without 
going through the hassle of editing 
and reassembling the BIOS portion of 
CP/M. 

Another option of the Little Board 
that I find most useful is the ability to 
reconfigure dynamically one of the 
four floppys to that of another com- 
puter. For example, often I need to 
read disks formatted on a Morrow 
system. To do this I simply assign 
drive E: to one of my physical drives 
and set the disk parameters to simu- 
late the Morrow system. Any further 
access to drive E: now causes CP/M 
to respond as if it were actually run- 
ning on the other computer. 

Two associated utility programs 
are provided to use the drive E: op- 
tion. One will allow you to set auto- 
matically drive E: to any of about a 
dozen different disk types simply by 
selecting it from the menu. The other 
prompts you for the various disk pa- 
rameters used by CP/M. 

A host of other utility programs 
are provided with the Little Board. I 
have found all of them to be well im- 
plemented and very useful. 


User Impression 

I have been using the Little Board 
daily for several months. And over 
the last three weeks it has been the 
main processor for my 24 hour per 
day Bulletin Board System. During 
that time the Little Board has not 
been down a single moment. 

The only fault that I find significant 
enough to mention is the failure to 
bring all the serial and parallel control 
lines.out to their connectors, although, 
in all fairness, I haven’t needed them. 
As I mentioned earlier, I have at- 
tached a modem and a serial printer to 
channel B without problem. 


Wrapping Up 

I haven’t been able to finish every- 
thing that I wanted to say about the 
Little Board; I’m working on adding 
a real time clock and disk data inter- 
rupts to the BIOS. That material will 
have to wait until next month. 

DDJ 


Reader Ballot 
Vote for your favorite feature/article. 
Circle Reader Service No. 199. 
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AT” Pfantasies for your PC or XT.” 


Want better speed and memory on your igs hardware-dependent programs and 
PC or XT without buying an AT? back again without rebooting. All with 
You've got it! ; Pfaster286’s compatible ROM software. 
Phoenix’s new Pfaster™286 co-processor == ns And, Pfaster286 does the job unintrusively! 
board turns your PC or XT into a high- OO ee No motherboard to exchange. No wires to 
speed engine 60 percent faster than an —-—- .. solder. No chips to pull. Just plug it into a 
AT. Three times faster than an XT. It even oo : standard card slot, and type the 
supports PCs with third-party hard disks. ee ~ magic word, “‘PFAST:’ 
But that’s only the beginning. CELL Gai If you really didn’t want an AT in the first. 
You can handle spreadsheets and programs Cpl be G hia» place, just what it could do for you, call or 
you never thought possible. Set up RAM disks in Syed jf Cet IF write: Phoenix Computer Products Corp.., 
both 8088 and 80286 memory for linkage editor “C4 hp 1416 Providence Highway, Suite 115, 
overlays or super-high-speed disk caching. All with “SSS Norwood, MA 02062; (800) 344-7200. 
Pfaster286’s Imb of standard RAM, expandable to <4: , In Massachusetts, 617-762-5030. 
2mb, and dual-mode design. <7 
You can develop 8086/ 186/286 software on your XT er Programmers’ Pfantasies™ 
faster. Execute 95 percent of the application packages by 
that run on the AT, excluding those that require fancy I/O 
capabilities your PC or XT hardware just isn’t designed 
to handle. Queue multi-copy, multi-format print jobs for 
spooling. Or, switch to native 8088 mode to handle 


XT and AT are trademarks of International Business Machines Corporation. Pfaster286 and Programmers’ Pfantasies are trademarks of Phoenix Computer Products Corporation. 
For the Ferrari aficionado: yes. we know this is a rear engine car. We are showing the addition of a second engine to symbolize how Pfaster can be added to your PC or XT to increase performance. 
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16-BIT SOFTWARE TOOLBOX 





by Ray Duncan 


The programs published in this 
month’s column are available for 
downloading from the Laboratory 
Microsystems RBBS at (213)306- 
3530 (300 or 1200 baud). 


Laserjet Redux 

After the June 1985 16-Bit Software 
Toolbox appeared in print, I received 
some “thot and bothered” phone calls 
from friends at Hewlett-Packard 
about the tone of my comments on 
the Laserjet Printer. They knew very 
well that I consider the Laserjet to be 
a fantastic printer and the greatest 
thing since sliced bread, but they 
thought that readers might get an al- 
together different impression by 
reading the column. Upon reviewing 
the June column, I’m afraid I must 
agree with them. 

First, the recommendation to 
switch to Spellbinder was strictly that 
of the dealer and is not an official po- 
sition of Hewlett-Packard. Further- 
more, Hewlett-Packard distributes a 
technical bulletin to its dealers with 
information on converting IBM PC 
WordStar for use with the Laserjet 
Printer (though the conversion doesn’t 
offer as many capabilities as the spe- 
cially patched version I got from Mi- 
croPro Technical Support; but see 
page 4), and the HP-150 and HP-110 
versions of WordStar support the La- 
serjet directly. Finally, the slow speed 
(2-3 pages/minute) is the result of 
the strategy used by IBM PC Word- 
Star for microjustification; the Laser- 
jet is capable of 8 pages/minute when 
driven by other word processors. 

As a gesture of atonement to La- 
serjet fans, this month’s Listing One 
(page 117) is a file-printing program 
in Lattice C that prints two pages 
across in “‘Landscape”’ mode along 
with filenames, a time and date 
stamp, and page numbers. 
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We should note in passing that the 
new version of Microsoft Word offers 
full support for the Laserjet and for 
the IBM Enhanced Graphics Adap- 
tor; between the three, it should be 
possible to turn out some excellent- 
looking documents. 


Microsoft Assembler 

In the June 1985 column, I also inad- 
vertently introduced some confusion 
about the IBM Macro Assembler 
Version 2. Although my IBM Product 
Center didn’t know about it, there ac- 
tually was a reduced price update of- 
fer from IBM for owners of the Mac- 
ro Assembler Version 1.0; it involved 
sending $75 and the cover sheet from 
your original manual to IBM, and in 
return they would ship you the new 
assembler and documentation. This 
update offer expired at the end of 
June 1985. 

I have since learned that the refer- 
ence section on the assembler mne- 
monics, which I complained had dis- 
appeared from the manual, was 
expanded into another volume called 
the Macro Assembler Programmer's 
Reference. This second manual is 
supposed to be delivered to you along 
with the operations manual and the 
disk, but none of the stores I’ve been 
to are displaying it with the Macro 
Assembler—so if you want it, you'll 
have to know to ask for it. 

The respective version numbers 
used by IBM and Microsoft are also 
causing a lot of confusion. The IBM 
Macro Assembler Version 2.0 ap- 
pears to be essentially the same as the 
Microsoft Macro Assembler Version 
1.25, released over a year ago. The 
SALUT utility is apparently IBM’s 
sole addition to the package. There 
never was a Microsoft Macro Assem- 
bler Version 2.0; Microsoft jumped 
directly to Macro Assembler Version 


3 with its latest release in order to 
make the version number match the 
current release of MSDOS/PCDOS. 

David Rabbers writes: “‘Microsoft 
MASM Version 3 is greatly worth the 
purchase. It not only includes a better 
assembler (implements the rest of the 
80286 op-codes), which they claim 
has fewer bugs (at least some old ones 
are fixed and I haven’t found the new 
ones yet), but you get two new utili- 
ties that alone are worth the $75 up- 
grade fee. First is a version of the 
Unix utility MAKE. I have never seen 
MAKE before, but this one seems 
simplistic though adequate for any- 
thing I can envision. The second utili- 
ty is SYMDEB, a very good symbolic 
debugger. It is an enhancement to 
DEBUG with a natural and compati- 
ble (well, pretty close) extension to 
the DEBUG command syntax ....” 
SYMDEB can handle symbol tables 
generated by the Microsoft high-level 
language compilers. 

Readers have reported perplexing 
problems when trying to convert to 
the IBM Macro Assembler 2.0. A 
number of programs that assembled 
and ran properly with IBM Macro As- 
sembler 1.0 won’t assemble without 
errors—or if they do assemble without 
errors, they won’t run. An example of 
this is the statement: 


namel EQU (THIS BYTE)- 
(OFFSET name2) 


This does not give an error message 
in itself (it assembles, strangely 
enough, as an equals sign followed by 
absolutely nothing), but it causes a 
cascade of phase errors throughout 
the rest of the program. Everything 
works fine when the statement is 
changed to: 


namel EQU $-name2 
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Steve Itzkowitz reported another | 


odd experience working with the pro- 
gram DSKWATCH, which is avail- 
able on many IBM PC bulletin 
boards. It appears to assemble identi- 
cally with both IBM Macro Assem- 
blers 2.0 and 1.0. However, with Mi- 
crosoft Macro Assembler 1.27 and 
3.0, it will not assemble cleanly, and 
when the errors are corrected by a tri- 
al and error process, the resulting 
program does not run. Other readers 
are invited to send in their own expe- 
riences and comments. 


Detecting Intel Numeric 
Coprocessors 

When writing 8086 applications that 
perform floating-point arithmetic, 
you should test for the presence of an 
Intel 8087 and exploit it if it is avail- 
able. The accepted strategy for this 
test has been to initialize the proces- 
sor, and then to write the control 
word into a previously zeroed memo- 
ry location and examine the result: 


fninit 
mov variable,0 
fnstcw variable 


cmp ss variable,03ffh 
jeq.  np_present 
jmp  np_—absent 


If an 8087 is present, the control 
word will be stored into the memory 
variable as 03FFH; if it is not present, 
the contents of the variable will not 
change. It is important not to use any 
wait instructions during this test: if 
the 8087 is not present, the wait will 
cause the 8086 simply to hang (this is 
why the fninit and fnstew variations 
of the Intel mnemonics are used 
above, instead of finit and fstew). 

It turns out that programs using 
this strategy will fail to detect the 
presence of an 80287 in a PC/AT or 
other 80286-based system. Although 
the 80287 is software compatible 
with the 8087 in every other way, it 
initializes one of the bits in the lower 
byte of its control word opposite to 
the 8087. So the compare instruction 
in the above code sequence should be 
changed to 


cmp byte ptr variable+ 1,3 
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RUN/C: 


The C Interpreter 
Only °149.95! 








For both 
the beginner and the C professional, 
RUN/C: The C Interpreter 
makes program development easier and 
faster. With RUN /C all those C programs you've 
been writing — or have been wanting to write — 
can be up and running in a fraction of the time. 


The beauty of RUN /C is that it provides 
a BASIC-like user interface for C: it allows the user 
to edit and debug code immediately and interactively. 





RUN /C is the first @ ogram to make C a user-friendly language. 


Although C is structure. compact and FAST, the writing and testing 
of C programs is often a tedious process. RUN /C helps bring up to 
speed both your programs and your C programming skills. C 
programming has never been so fast and enjoyable! 


When running under RUN /C, yourC program performs exactly as it 
would if it were compiled (although slower since RUN /C is a true 
interpreter). If your program does have an error, RUN //C finds it, 
gives you a comprehensive error message and allows you to correct the 
error on the spot. Once you are completely satisfied with your C 
program it can be SAVEd, then compiled and linked using your favorite 
C compiler. 


RUWN/?/C offers easy and familiar commands such as LOAD, LIST, 
SAVE, RUN, etc. A powerful line editor is built right in. RUN /C’s 
SHELL command will also allow you to use your own editor for 
extensive full-screen editing, and then return your newly edited 
program to RUN /C — all within a single, unified environment. 


RUN /C offers: 

e A robust implementation of 
standard Kernighan and Ritchie C. 

e Full floating point, 8087 math 
chip support, structures, 
unions, initializers, casts and 
more than 100 built-in standard 
C library functions. 

e An easy-to-read 475-page 
manual filled with useful 
examples to help you master 
the C language. 

e TRON, TRACE and DUMP 
diagnostics PLUS a program 
profiler. 


e Printer and asynchronous 
communications support. 

e A full set of buffered and 
unbuffered file |/O functions. 

e Nearly 100 sample C programs 
on disk illustrating the most 
important C functions and 
concepts. 

e System Requirements: 
IBM® PC or compatible with 
PC-DOS 2.0 or MS™-DOS 2.0 


CALL for information on non-IBM 
compatible MS-DOS systems. 


For immediate delivery or more information: 


O11 Lifeboat” 


1-800-847-7078 —_ 


In NY, 1-212-860-0300 


Lifeboat™ Associates 1651 Third Ave.New York. NY 10128 


RUN/C is a trademark of Age of Reason Co. 
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Outstanding Software 
Value 

I have been using a program called 
UNIFORM by Micro Solutions on my 
Kaypro IV for two years to read and 
write disks in the various incompati- 
ble CP/M 54-inch disk formats and 
have been very happy with it. It has 
saved me untold dollars in download- 
ing fees. Now Micro Solutions has 
outdone itself with a release of UNI- 
FORM for the IBM PC that ought to 
serve as a standard of quality, docu- 
mentation, and ease of use for other 
software vendors. 


116 





Basically, UNIFORM for the PC 
consists of an installable system driv- 
er (UNIFORM.SYS) and a separate 
control and disk initialization. pro- 
gram (UNIFORM.EXE). When the 
driver is linked into your operating 
system by including its name in the 
CONFIG.SYS file on the boot disk, it 
causes your second floppy disk drive 
(B:) to double as a logical drive (C:). 
When the drive is addressed as B:, it 
appears to be a normal MSDOS disk 
drive. But when it is addressed as C:, 
it almost magically makes disks in 
CP/M formats appear as though they 





were MSDOS disks! 

You can do directories on CP/M 
disks, copy files to and from your 
other MSDOS format drives, erase or 
rename files, and in general complete- 
ly ignore the fact that the disk in phys- 
ical drive B: is formatted and struc- 
tured in a way that is totally alien to 
the MSDOS operating system. In my 
opinion, this is a real software coup. 

The separate control program is 
menu driven and allows you to set up 
the logical drive C: for some 80 dif- 
ferent soft-sectored 5%-inch CP/M 
formats, including the Epson QX-10, 
the Kaypro, and the DEC VT-180. In 
addition, if your system has a special 
controller for 80-track 5%-inch 
drives or 8-inch drives, UNIFORM 
can handle that too, which gives you 
an even wider selection of disk for- 
mats to choose from. UNIFORM can 
also initialize disks in all of these dif- 
ferent formats. This is a boon to small 
software houses—it allows them to 
centralize their distribution files on a 
large fixed disk hooked to an MSDOS 
machine, without dropping support 
for their CP/M customers. UNI- 
FORM for the IBM PC costs $69.95 
(it’s easily worth ten times that) and 
is available from Micro Solutions at 
125 South Fourth Street, DeKalb, II- 
linois 60115. Phone (815)756-3411. 


Breaking with MSDOS 
The MSDOS Control-Break handler, 
whose address is stored in the INT 
23H vector, is a continual thorn in the 
side of application programmers. 
Whenever MSDOS detects a Control- 
C in a character stream (especially an 
unintentional or deliberate Control-C 
entered at the keyboard by the opera- 
tor) during an I/O operation, it trans- 
fers directly to this handler. The de- 
fault action of this handler is simply to 
blow the unsuspecting application out 
of the water ... leaving temporary 
files on the disk, critical data files un- 
closed, critical interrupt vectors un- 
restored, etc. This, of course, is anti- 
thetical to the concept of a robust 
application, which should always be 
able to accomplish a graceful exit. 
The programmer can take two ap- 
proaches to the Control-C problem. 
The first is to disable and/or avoid 
Control-C detection by a variety of 
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methods, such as using only those I/ 
O function calls that are not Control- 
Break sensitive; disabling Control-C 
detection during miscellaneous 
MSDOS operations with the MSDOS 
function call 33H; and putting all of 
the character drivers into “raw I/O” 
or “uncooked” mode. 

A more straightforward way to 
beat the Control-C rap is simply to 
replace the MSDOS INT 23H handler 
with your own. On the IBM PC, you 
can also take over the INT 1BH vec- 
tor, which is called by the ROM BIOS 
keyboard driver whenever a Control- 
Break is detected. This is easy 
enough for applications written in as- 
sembly language but a little more 
tricky for those using high-level lan- 
guages. Note that the INT 23H han- 
dler is a standard MSDOS feature, 
and code that captures this interrupt 
is portable across all MSDOS sys- 
tems. INT 1BH, however, is a func- 
tion of the IBM ROM BIOS and will 
not be valid on other machines unless 
they are a very close IBM compatible. 

Listing Two (page 119) is the 
source code for assembly language 
functions that can be linked with Lat- 
tice C applications to take control of 
the Control-Break interrupt han- 
dlers. This code should be readily 
portable to other C compilers and to 
assembly language applications. The 
function “capture” is called with the 
address of an integer variable within 
the C program; it saves the address of 
the variable, points the INT 1BH and 
23H vectors to its own interrupt han- 
dler, and returns. When a Control-C 
or Control-Break is detected, the in- 
terrupt handler sets the integer vari- 
able within the C program to “‘True”’ 
and returns—the program can then 
poll this variable at its leisure. The 
function “‘release’’ simply restores 
the INT 1BH and INT 23H vectors to 
their original values, thereby dis- 
abling the application’s interrupt 
handler. Listing Three (page 120) is 
a short C program that illustrates the 
use of these functions. 

It is a good idea to use the MSDOS 
Get Interrupt and Set Interrupt func- 
tion calls to inspect and modify the 
contents of the interrupt vectors. This 
will keep your application compatible 
with multitasking environments such 
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16-Bit 


(Text begins on page 114) 


Listing One 


/** 


ek 
** 
ax 
** 
xk 
zk 
** 
x 
ak 
ax 
x 
** 
a 
ax 
*x* 
ae 
x* 
ee 
ak 


x* / 


LJ.C -- A printing utility for the HP LaserJet 


This program prints a series of files on the LaserJet 
printer. The files are printed in a "landscape" font at 
17 characters to the inch. To take advantage of this 
density, two "pages" of information from the file are 
printed on each piece of paper (left and right halves). 
Usage is: LJ. filel.-file2-£iTé3- 6 
Where file# is a valid MS-DOS filename, included on the 
command line. This program is compatible with Lattice C 
on the IBM PC and the HP Touchscreen computers, 


Joe Barnhart 
Ray Duncan 
Joe Barnhart 


original version 
date and time stamping 
revised date stamping 


May 5, 1985 
May 22, 1985 
June 6, 1985 


#include <h\stdio.h> 


#define MAXLINE 56 /* maximum lines per page */ 
#define PAGE ENE" /* for compilers without '\f' */ 
#define TAB 8 /* width of one tab stop */ 
typedef struct { 
int -ax,be, cx, @x> Bi, dl 
} REGSET; 
main(argc, argv) 
int argc; 
: char *argv[]; 
int filenum; 
FILE *fp, *prn, *fopen(); 
if( ( prn = fopen( “PRN:", “w" ) ) == NULL ) 
Pee "Error opening printer as file.\n" ); 
else 


fprintf( prn, "\@15\033E" ); 


} 


/* initialize the LaserJet for landscape printing */ 
fprintf( prn, *\833E\833&110\933 (sl17H\933&18d6E" ); 
for( filenum = 1; filenum < argc; filenum++ ) { 
fp = fopen( argv[filenum] ,"r" ); 
if( fp == NULL.) 
eo "File %s doesn't exist.\n", argv[filenum] ); 
else 
printf( "Now printing s\n", argv[filenum] ); 
printfile( fp, prn, argv[filenum] ); 
fclose( fp ); 


} 
/* 


clear LaserJet */ 


printfile(fp,prn,filename) 


PILE 
char 


*fp,*prn; 
*filename; 


int pagenum = 1; 


while( !feof( fp ) ) 


{ 
fprintf( prn, "\@33&a9r85m5L\015" ); /* 
printpage( fp, prn )}; 


set left half */ 
print page */ 


if( !feof( fp ) ) { /* if more .. */ 
fprintf( prn, "\@33&a0rl171m91L" ); /* set right half */ 
printpage( fp, prn )}; /* print another */ 
stamp( prn, filename, pagenum++ ); /* title */ 
fputc( PAGE, prn )}3 /* kick paper */ 
} 
printpage(fp,prn) 
FILE *fp,*prn; 
char c}3 
int line,col; 


(Continued on next page) 
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as TopView and MS Windows. The 
interrupt vector table belongs to the 
operating system, not to the applica- 
tion, and it’s not nice to modify mem- 
ory directly that doesn’t belong to 
you. If the fabled “Big DOS” ever 
comes along that runs in 80286-pro- 
tected mode, your application will 
just get aborted if you try to twiddle 
the vector table without using the 
proper operating system services pro- 


vided for that purpose. 

Although in this little example pro- 
gram the INT 23H vector is restored 
by the “release” function, MSDOS 
will restore this vector for you auto- 
matically when your program exits. 
However, because INT 1BH 1s an 
IBM PC-specific interrupt handler 
and so is not known to MSDOS, it is 
absolutely mandatory, should your 
program modify this vector, that it re- 


store the vector properly before exit- 
ing. Otherwise, the vector will be left 
pointing to some random area in the 
next program that runs—and the next 
time you press Control-Break, a sys- 
tem crash is the best you can hope for. 


DD] 


Reader Ballot 
Vote for your favorite feature/article. 
Circle Reader Service No. 200. 





16-Bi f (Listing Continued, text begins on page 114) 


Listing One 


line = col = 8; 
while( line < MAXLINE ) 


switch( c = fgetc(fp) ) f{ 


case '\n': 
col = @; 
linet++; 
fputc('\n',prn); 
break; 

case '\t's: 
do 


/* newline found */ 
/* zero column */ 
* adv line cnt */ 


/* TAB found */ 


fputc('\848',prn); 


while ( (++col % TAB) 


break; 
case PAGE: 
case '\377': 
line = MAXLINE; 


l= @ ); 


/* Page break or */ 
/* EOF found */ 
/* force terminate */ 


break} 
default: /* no special case */ 
fputc(c,prn) 3 /* print character */ 
col+t; 
break; 
} 
} 
stamp( prn, filename, pagenum ) 
FILE *prn; 
char *filename; 
, int pagenum; 
char datestr[18], timestr[10]; 
fprintf( prn, "\833&a51171M" ); /* widen margins */ 
fprintf( prn, "\@15\033&6a58R" ); /* move to row 58 */ 
fprintf( prn, "File: %-133s", filename ); 
fprintf( prn, “Page %-3d", pagenum) ; 
timestamp( timestr ); 
datestamp( datestr ); 
forinteé( pro," $s ts", datestr, timestr); 
} 


datestamp( datestr ) 
char *datestr; 


REGSET regs}; 
int month, day, year; 


regs.ax = 8x2aQQ@; 
int86( 0x21, &regs, &regs ); 


month = ( regs.dx >> 8 ) 
day = regs.dx & 255; 
year = regs.cx —- 1968; 


; sprintf( datestr, 


timestamp( timestr ) 
char *timestr; 


REGSET regs; 
int hours, mins; 


regs.ax = §6x2c8B; 
int86( 8x21, &regs, &regs ); 
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& 255; 


"$02d/%82d/%02d", month, day, year); 
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hours = ( regs.cx >> 8 ) & 255; 
mins = regs.cx & 255; 
sprintf( timestr, "%82d:%82d", hours, mins ); 


End Listing One 


Listing Two 


BREAK.ASM Control-C Handler for Lattice C 


=e “e ~e “Oe Se SO “Oe “6 Se Se SO SO SS TO ME SO NO ME NO TO SO OTS SE SO OSS 


ar 


ar 


Cr 
lf 


=e 76 Se Se Oe NO SO SS SS SE TO 


title Control-Break handler for Lattice C programs 
name break 
include dos.mac 


Control-Break Interrupt Handler for Lattice C programs 
running on IBM PCs (and ROM BIOS compatibles) 


Ray Duncan, May 1985 


This module allows C programs running on the IBM PC 

to retain control when the user enters a Control-Break 
Or Control-C,. This is accomplished by taking over the 
Int 23H (MS-DOS Control-Break) and Int 1BH (IBM PC 

ROM BIOS Keyboard Driver Control-Break) interrupt 
vectors. The interrupt handler sets an internal 

flag (which must be declared STATIC INT) to TRUE within 
the C program; the C program can poll or ignore this 
flag as it wishes. 


The module follows the Lattice C parameter passing 
conventions, and also relies on the Lattice file DOS.MAC 
for the definition of certain constants and macros. 


The Int 23H Control-Break handler is a function of MS-DOS 
and is present on all MS-DOS machines, however, the Int 1BH 
handler is a function of the IBM PC ROM BIOS and will not 
necessarily be present on other machines. 


tf lprog 
gs equ 6 ;0ffset of arguments, Large models 
else 
gs equ ” ;0ffset of arguments, Small models 
endif 
equ 8dh sASCII carriage return 
equ Bah sASCII line feed 
pseg 
public capture,release ;function names for C 


The function CAPTURE is called by the C program to 
take over the MS-DOS and keyboard driver Control- 
Break interrupts (1BH and 23H). It is passed the 
address of a flag within the C program which is set 
to TRUE whenever a Control-Break or Control-C 

is detected. The function is used in the form: 


static int flag; 


capture (&flag) 
capture proc near ;take over Control-Break 
push bp zinterrupt vectors 
Mov bp,sp 
push ds 
mov ax,word ptr [bptargs] 
mov cs:flag,ax ;save address of integer 
mov cs:flag+2,ds :flag variable in C program 
;pick up original vector contents 

mov ax,3523h ;for interrupt 23H (MS-DOS 
int 21h ;Control-Break handler) 
mov cs:int23,bx 
mov cs:int23+2,es 
mov ax,35l1bh sand interrupt 1BH 
int 21h (IBM PC ROM BIOS keyboard driver 
mov cs:intlb,bx ;Control-Break interrupt handler) 
mov cs:intlb+2,es 
push cs ;set address of new handler 
pop ds 
Mov dx,offset ctrlbrk 
mov ax,92523H :for interrupt 23H 
int 21h 


(Continued on next page) 
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HISOFPT 


HIGH QUALITY (CD/\Yf 


SOFTWARE 


HiSoft has been selling Z80 CP/M software in 
Britain and Europe for over 4 years. Now we'd 
like to introduce you to our range of program- 
ming languages: 


HiSoft Devpac: Z80 assembler/editor/ 


debugger 
HiSoft C: Kernighan/Ritchie 
implementation 
HiSoft Pascal: fast, standard compiler 
All at $69 inclusive each. 


These programs are also available for other 
Z80 machines including Timex 2068. 


Call or write for full technical details and 
press commentaries, or order from: 


SS WISOFT 
Aa > 180 High St. North 


sara Dunstable LU6 1AT 
VISA 


ENGLAND 
Circle no. 48 on reader service card. 


Finally. 
BSW-Make. 


The Boston Software Works now brings a 
complete implementation of the Unix 
“make” facility to MS-DOS. No more recom- 
piling every file in sight after a small edit; no 
more wondering if you've really rebuilt every 
module affected by an edit. Just type “make” 
and BSW-Make automatically builds your 
product quickly, efficiently and correctly. 


BSW-Make supports: 


e most compilers and assemblers 
e MS-DOS or PC-DOS v2.00 or later 
e macros for parameterized builds 
e default rules 
e MS-DOS pathnames 
e any MS-DOS machine 
(192K minimum) 




















Only $69.95 postpaid (Mass. residents add 5% sales tax) 
The Boston Software Works 


120 Fulton Street, Boston, MA 02109 
(617) 367-6846 







Circle no. 126 on reader service card. 


Advanced 
Trace8s6"™ 


Symbolic Debugger & Assembler Combo 


Full-screen trace with single stepping; 
Even backstepping! 


Write & Edit COM & EXE programs 
Conditional breakpoints (programmable) 


Switch between trace and output screen; 
Or set up two monitors 


¢ 8087, 80186, 80286, 80287 support 
* Write labels & comments on code 
e Polish hex/decimal calculator 
e and more... Priced at $175.00 


To order or request more information contact: 
| Morgan Computing Co., Inc. 


2520 Tarpley Rd. Suite 500 


(214) 245-4763 Carrollton, TX 75006 
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with 


TURBO REF 


a Cross-Reference and Lister 
utility for Pascal source programs. 


e All options user-selectable. 

e Identifies line number for each 
variable reference. 

e Can cross-reference constants. 

e Indicates type of reference. 

e Will process a list of files. 

e Will read Include files. 

e Draws boxes for control structures 
— example: 


if PascalProgrammer then 
begin 
CallGracon ; 


repeat 
[ RunTurboRef ; 
until Organized ; 


end ; 





Written in Turbo Pascal for the IBMPC. 
PC-DOS 2.0 and 128K required. 


Only $49* 


MC, Visa, or Company check. 
C.0.D. orders add $4.00. 


Michigan residents add $2.00 sales tax. 









fe RACON SERVICES, INC. 
gums) 4652 OkEMOS Rd. 

Visa OKemMos, MI 48864 SS 
MN) (517) 349-4900 

IBM and PC-DOS, and Turbo Pascal are registered 
trademarks Of International Business Machines Corp. 


and Borland International Inc., respectively. 


| 


Circle no. 130 on reader service card. 
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16-Bi f (Listing Continued, text begins on page 114) 
Listing Two 


mov ax,@251bH gand interrupt 1BH 

int 21h 

pop ds ;restore registers and 
pop bp ;return to C program 
ret 


capture endp 


{=e se we Se Te Se Se Se NO Se NO 


The function RELEASE is called by the C program to 

return the MS-DOS and keyboard driver Control-Break 
interrupt vectors to their original state. [Int 23h is 
also automatically restored by MS-DOS upon the termination 
of a process, however, calling RELEASE allows the C 
program to restore the default action of a Control-C 
without terminating. The function is used in the form: 


release () 
elease proc near srestore Control-Break interrupt 
;vectors to their original state 
push bp 
mov bp, sp 
push ds 
mov dx,cs:intlb ;set interrupt 1BH 
MOV ds,cs:intlb+2 3 (MS-DOS Control-Break 
mov ax, 25l1bh zinterrupt handler) 
int 21h 
mov dx,cs:int23 ;set interrupt 23H 
mov ds,cs:int23+2 ;(IBM PC ROM BIOS keyboard driver 
Mov ax, 2523h :Control-Break interrupt handler) 
int 21h 
pop ds srestore registers and 
pop bp return to C program 
ret 


release endp 


Q se se Se Se Se te Ne SO Ne NO SO TO 


This is the actual interrupt handler which is called by 
the POM BIOS keyboard driver or by MS-DOS when a Control-C 
or Control-Break is detected. Since the interrupt handler 
may be called asynchronously by the keyboard driver, it 

is severely restricted in what it may do without crashing 
the system (e.g. no calls on DOS allowed). In this 
version, it simply sets a flag within the C program to 
TRUE to indicate that a Control-C or Control-Break has 
been detected; the address of this flag was passed 

by the C program during the call to the CAPTURE function. 


trlbrk proc far ;Control-Break interrupt handler 
push bx ;save affected registers 
push ds 
MOV bx,cs:flag ;set flag within C program 
mov ds,cs:flag+2 sto "True" 
mov word ptr ds: [bx],-1l 
pop ds 4 ;restore registers and exit 
pop bx 
iret 
ctrlbrk endp 
flag dw 0,9 slong address of C program's 
;Control-Break detected flag 
int23 dw 8,8 sOriginal contents of MS-DOS 
;Control-Break Interrupt 23H 
s;vector 
intlb dw 8,8 ;original contents of ROM BIOS 
skeyboard driver Control-Break 
s;Interrupt 1BH vector 
endps 
end 


TRYBREAK.C Demo of Control-C Handler 
/* 


Demonstrate Control-Break interrupt handler for Lattice C 
Ray Duncan, May 1985 


oF 
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#include <h\stdio.h> 


main(argce, argv) 
int argc; 
char *argv[]; 


{ int hit = 6; 
int c = 6; 
static int flag = 8; 


capture (&flag); 
puts("\nTRY has CAPTURED interrupt vectors\n"); 


while ( (c&127) != 'Q') 
{ hit = kbhit(); 
if (flag I= 8) 
{ puts("\nControl-Break detected\n"); 
flag=8; 


} 
if (hit != 8) 
{ c=getch(); 
putch(c); 


} 
release(); 
puts("\n\nTRY has RELEASEd interrupt vectors\n"); 


} End Listings 


DATESTAMPER" has the answers 


When did we 
i—_ print that letter? 


Has the mailing 
list been updated? 


Which is the 
latest version? 


DateStamper™ keeps your CP/M computer up-to-date! 
® avoid erasing the wrong file © keep dated tax log of computer use 
© back-up files by date and time © simplify disk housekeeping chores 


OPERATION: DateStamper extends CP/M 2.2 to automatically record date and time a file is created, read or 
modified. DateStamper reads the exact time from the real-time clock, if you have one; otherwise, it records the order in 
which you use files. Disks prepared for datestamping are fully compatible with standard CP/M. 
INSTALLATION: Default (relative-clock) mode is automatic. Configurable for any real-time clock, with pre- 
assembled code supplied for all popular models. Loads automatically at power-on. 

UTILITIES: Enhanced SuperDirectory ¢ Powerful, all-function DATSWEEP file-management program with date and 
time tagging ® Installation and configuration utilities 

PERFORMANCE: Automatic. Efficient. Versatile. Compatible. 


Requires CP/M 2.2. Uses less than 1K memory. Real-time clock is optional. 


When ordering please specify format 


8" SSSD, Kaypro, Osborne Formats Write or call for further information 
For other formats (sorry, no 96 TPI) add $5. 


Shipping and handling 


California residents add 6% sales tax : 
MasterCard and Visa accepted (Plu Perfect Systems) 


Specialized versions of this and other software available for the Kaypro. . § _44 
CP/M is a registered trademark of Digital R ch te BOX 1494 e IDYLLWILD. CA 92349 © 714-659-4432 
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by Alex Ragen 


IBM PC 

Computers like the Compaq used to 
be called “portables,” but that mis- 
nomer soon gave way to the more ac- 
curate “transportable” and more re- 
cently to “lugable,” which is really 
the only way to describe those 30 
pound monsters. There are now avail- 
able, however, several machines that 
are truly portable. 

Morrow introduced its Pivot II at 
Comdex in Atlanta. The original Piv- 
ot had a 16-line display, but the new 
model has a full 25-line display. 
There are three versions, priced be- 
' tween $1995 and $3795 depending on 
various optional features. 

The big problem with portables of 
this type is the screen. Data General 
has changed screens twice on its im- 
pressive (but expensive) DG/1 in re- 
sponse to complaints about readabili- 
ty. The Pivot II uses a technology 
Morrow calls LumiCon, which com- 
bines the high quality of electrolumi- 
nescent displays with the low cost and 
power requirements of liquid crystal 
displays (LCDs). Also a proprietary 
nonglare material makes the screen 
less susceptible to glare than the stan- 
dard CRT display, Morrow claims. 

The CPU is the 80C88, a CMOS 
version of the 8088, and the minimum 
memory configuration is 256K. The 
computer’s dimensions are 13 X 6 X 
9.5 inches, and it weighs only 13 
pounds with two 54-inch drives. MS- 
DOS 2.11 and NewWord (a word pro- 
cessing program strikingly similar to 
WordStar) are included. The power 
pack and internal rechargeable Nicad 
battery provide more than three hours 
of continuous operation. There is also 
a 32K ROM, which includes a number 


of utilities like a calculator, diary, 
phone directory, and autodialer. For 
additional information, contact Mor- 
row at 600 McCormick, San Leandro, 
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California 94577 (415) 430-1970. 
Reader Service Number 101. 

Kaypro too has introduced an 11- 
pound portable, the Kaypro 2000, 
whose price also begins at $1995. It 
features full IBM PC compatibility, 
256K of RAM, a 25-line screen, a sin- 
gle 34-inch 720K disk drive (in the 
minimum configuration), and Word- 
Star and CalcStar bundled in. Its 
built-in battery pack provides for four 
hours of continuous operation. The 
adjustable LCD behaves like an IBM 
color card with a monochrome adapt- 
er. With the addition of an optional 
base unit (which contains a 54-inch 
drive), the machine can accept stan- 
dard IBM expansion cards. Kaypro 
has also announced the 286i model A, 
a smaller version of its IBM PC/AT 
compatible 286i, priced at $2995 and 
including 512K of RAM and GW-BA- 
SIC. For further information, contact 
Kaypro at P.O. Box N, Del Mar, Cali- 
fornia 92014 (619) 481-4300. Reader 
Service Number 103. 

Zenith’s new 14.5-pound Z-171 
portable PC offers full IBM PC com- 
patibility, 256K of RAM (expandable 
to 640K), a 25-line flat panel backlit 
LCD, and two disk drives. The price is 
$2699. The company has also intro- 
duced the Z-200 Advanced PC, a 
PC/AT compatible model with some 
extra features, which comes in sever- 
al configurations priced between 
$3999 for the single floppy version 
and $5599 for the 20 MB hard disk 
version. Other new products include 
the Z-138, a 24-pound “transport- 
able” with a 7-inch amber display 
and detachable keyboard, which 
starts at $2099, and two additions to 
the Z-150 PC family: the Z-148 and 
Z-158. Contact Zenith Data Systems 
at 1000 Milwaukee Avenue, Glen- 
view, Illinois 60025 (312) 391-8949. 
Reader Service Number 105. 


A 





You don’t have to trade in your ag- 
ing IBM PC/XT for an AT. Seattle 
Telecom & Data has announced the 
PC 286-MTM, a 16-bit iAPX286- 
based accelerator board with 2.1 MB 
of bank-switched (paged) memory 
for the XT. It can support nine con- 
soles and is supported by Xenix, Pick, 
and Concurrent CP/M. The unit can 
also support a RAM disk driver, al- 
lowing the user to access 1.5 Mb of 
memory in RAM disk. The price is 
$1995. Contact the company at 2637 
15ist Place NE, Redmond, Wash- 
ington 98052 (206) 883-8440. Reader 
Service Number 107. 

Pfaster 286, a 80286-based add-on 
board that upgrades IBM PCs and 
PC/XTs to process data faster than 
an IBM PC/AT without losing the 
functionality of the native 8088, has 
been introduced by Phoenix Comput- 
er Products. The board is fully PC 
compatible, runs DOS version 2.0 and 
higher, and uses the native 8088 as a 
coprocessor to manage input/output. 
The price is $2395, with the 80287 
available for an additional $350. 
Contact the vendor at 1420 Provi- 
dence Highway, Suite 115, Norwood, 
Massachusetts 02062 (800)344-7200 
(in Massachusetts (617) 762-5030). 
Reader Service Number 109. 

A dedicated array processor, 
which plugs into a single expansion 
slot on the IBM PC, PC/XT, and PC/ 
AT and performs Fast Fourier Trans- 
forms 100 to 10,000 times faster than 
software-computed FFTs, has been 
introduced by the Ariel Corporation. 
The price is $1850 (quantity one). 
Two or more units can be installed in 
one host and will work in parallel, 
further increasing throughput. Con- 
tact the vendor at 600 West 116th 
Street, Suite 84, New York, New 
York 10027 (212) 662-7324. Reader 
Service Number 111. 
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Hallock Systems, a supplier of co- 
processors for Z80 systems, has intro- 
duced the Pro68, a Motorola 68000- 
based coprocessor board for the IBM 
PC. The board can be configured 
with between 256K and 3072K of 
RAM. The CPU runs at 10 MHz with 
no wait states, and the company says 
it runs eight times faster than the 
IBM PC and three times faster than 
the IBM PC/AT. Both CPM68K and 
OS9/68000 (a Unix-like operating 
system) are available, along with an 
editor, assembler, linker, debugger, 
and full K&R standard C compiler. 
Third party software includes all the 
popular high-level languages. For 
further information, contact the ven- 
dor at 267 North Main Street, Herki- 
mer, New York 13350 (315) 866- 
7125. Reader Service Number 113. 

Micro/Sys has introduced the 
BUS/BRIDGE family, which consists 
of 14 low-cost development packages 
that use the IBM PC as the host envi- 
ronment and provide for six target 
environments, including MULTIBUS 
(8085 and 8086), VMEbus (68000), 
STD BUS (Z80 and 8088), and MUL- 
TIBUS II (80286). Three software 
systems are supported: the target 
processor’s assembly language, some 
of the IBM PC’s popular compilers, 
and a special customized assembler 
and compiler. The 14 development 
packages consist of various combina- 
tions of the target hardware environ- 
ments and software systems. Prices 
run from $1295 to $5595. Contact 
the vendor at 1011 Grand Central 
Avenue, Glendale, California 91201. 
Reader Service Number 115. 

As everyone knows, APL on the 
IBM PC requires an 8087 or 80287, 
which (though they have come down 
in price somewhat in the last year) 
are still not exactly cheap. Also, some 
machines, like the PCjr, don’t sup- 
port the 8087, so until now APL has 
simply not been available for them. 
Enter the 8087 Eliminator, a soft- 
ware package from Fort’s Software 
that functionally replaces the math 
coprocessor but costs only $49 ($75 
for the PC/AT version). Contact the 
vendor at P.O. Box 396, Manhattan, 
Kansas 66502 (913) 537-2897. Reaa- 
er Service Number 117. 

If the PC/AT’s 20 Mb disk capaci- 
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ty leaves you unimpressed, perhaps 
what you need is Reference Technol- 
ogy’s CLASIX DataDrive Series 500, 
a laser disk drive with a capacity of 
550 Mb, priced at $1535. The bad 
news is that every one of those bytes 
is read only. Just the thing for the 
Britannica or the unabridged Oxford 
English Dictionary but not for every- 
one, despite the very reasonable 
price. Contact the vendor at 1832 
North 55th Street, Boulder, Colora- 
do 80301 (303) 449-4157. Reader Ser- 
vice Number 121. 

If 550 Mb is more than you need, 


mtb dsy iN) 


Pee yee aueniiel 
You've Been Seeking 
In A Database 


Synlett 


VET TeT TS S) Eo ene aeaenanear eeu 


UST me em BLO in 


Optotech has a 400 Mb WORM 
(Write Once Read Many times) opti- 
cal disk cartridge available. Contact 
the vendor at 770 Wooten Road, 
Suite 109, Colorado Springs, Colora- 
do 80915 (303) 570-7500. Reader Ser- 
vice Number 123. 

What’s a $45 billion company do- 
ing in the personal computer market? 
Whatever it wants to, according to 
some. What is that company hoping 
to achieve with TopView? Maybe all 
those royalty dollars flowing out to 
Bellevue every quarter are distressing 
a few souls in Armonk and Boca Ra- 


dBASE |! Compatible. 


. — 


io) aba 


full macro usage—and data file compatible 


tise aS) a 


An Economical Investment. 


ae -osl = 
7 oS) a: 


Don't be outfoxed by the others. 
Oe) eae elm at) SLA Em tN 


FoxBASE @&° 


FOX SOFTWARE, INC. 
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SNEAK PREVIEW 


of a powerful 


“An important new metaphor from the 
author of the best book on user interface design.” 
—Alan Kay, 

Apple Fellow, Apple Computer 


NEW SOFTWARE METAPHOR 


WANTED: People with Imagination, an IBM PC, and $59.95. 


by Paul Heckel President, QuickView Systems and author, Elements of Friendly Software Design 


arely does a software product 

introduce a new conceptual 
metaphor. VisiCalc introduced the 
electronic spreadsheet; Thinktank, the 
electronic outliner; and now Zoomracks, 
the electronic rack. Let me tell you 
what electronic racks are, why I think 
they are important, and how you can 
get to try them risk-free at a savings 
now and maybe help shape their final 
form to your liking. 


New Metaphor: 
Originally designed. to keep track of 
lists, names and addresses, appoint- 
ments, notes, and other information on 
portable computers, electronic racks 
provide a simple, consistent and rich 
organizational metaphor for data base, 
text, and other applications. 
Zoomracks starts with something 
familiar: racks—like those filled with 


ZOOMRACKS SPECIFICATIONS: 

= Copy and move fields, cards, and text 
into different fields, cards and racks. 

® Define and change card templates. 

# ASCII MS/DOS file format for 
conversion to other data formats. 

® Utilities to convert DBASE II files. 

@ Macros. 

# Simple Wordstarlike editor. 

= Easy to learn and easy to use for both 
occasional and frequent users. 

= Display sizes: 6 x 25 to 25 x 80. 

@ 8 racks on screen, in memory; 30 
fields/card; 80 characters/line; 250 
lines/field, 20,000 cards/rack. 

® Runs on 256K IBM PC. 





time cards next to time clocks in fac- 
tories. You can see the first line of each 
card, and take out a card to look at it in 
detail. You expect the cards in a rack to 
be in order, several racks to be next to 
each other; and to be able to move 
cards from one rack to another. 

You might put names and addresses 
in one, appointments in a second, 
notes in a third, sales orders in a 
fourth, memos in a fifth, and archived 
appointments or notes (moved or cop- 
ied from the second or third rack) in a 
sixth rack. To do something with 
Zoomracks, first ask yourself: “How 
could I do it with cards in racks?” 


Windows illuminate like a 
flashlight in a dark room 

Racks are displayed with Smart 
Zooms. While windows sacrifice the 
big picture to let you see the detail, 
Smart Zooms squeeze out the detail to 
always show you a recognizable big 
picture—whether a long shot of sev- 
eral racks, a closeup of one rack, or 
an extreme closeup of a single card. 


One time offer for 

If you like to stretch new products 
and influence their final form, we 
want your feedback. We are making a 
one time offer of a Sneak Preview Edi- 
tion of Zoomracks at an affordable 
ptice so you can try it and give us your 
feedback in time to make a difference 
before we officially introduce Zoom- 
racks in November. 


The Wide key (function fi) toggles between displaying the working racks (left two screens) and the 
current rack full (right two screens). Smart Zooms compress out detail to keep the big picture. 








What you get for $59.95 

@ The Sneak Preview edition of 
Zoomracks; 

= A free upgrade to the first run 
edition of Zoomracks; 

@ An acknowledgement in the user 


manual if you are the first to suggest 
an improvement we use; 


# A six-month unconditional 
moneyback guarantee. 


To order the 
Sneak Preview Edition 
$59.95 copy protected 
$79.95 copy unprotected 


CALL 
800-443-0100 EXT 341 


OR 
WRITE 
QUICKVIEW SYSTEMS 
146 Main Street, 
Suite 404 
Los Altos, CA 94022 


ton, or maybe something more sinis- 
ter is afoot. Who knows? But soft- 
ware developers are starting to bring 
out products with TopView in 
mind—although at this point Top- 
View is mostly unfulfilled promise. 
Lattice has introduced the Lattice 
TopView Toolbasket for program- 
mers writing applications to take ad- 
vantage of TopView’s multitasking 
window environment. There are 70 C 
functions to control window, cursor, 
and pointer operations, as well as 
printer control, cut and paste, and de- 
bugging functions. Memory require- 
ments are 256K, but 512K are rec- 
ommended. The price is $250 and the 
source code is available for $250 
more. For further information, con- 
tact Lattice at PO. Box 3072, Glen 
Ellyn, Ilinois 60138 (312) 858-7950. 
Reader Service Number 125. 

Matrix Software Technology has 
introduced Synergy, a 12K operating 
system with Macintosh-like desktop 
and windows, which runs under ei- 
ther DOS or TopView and allows up 
to six programs to run concurrently 
in windows without modification. 
Synergy can also run alone, and be- 
cause it requires only 12K of RAM, 
it will run on any PC and outperform 
TopView, according to the vendor, 
who can be contacted at 50 Milk 
Street, Boston, Massachusetts 
02109. Reader Service Number 127. 

Taking another approach, Quar- 
terdeck Office Systems has intro- 
duced DESQVIEW, a new version of 
its floppy-based DESQ memory-resi- 
dent multitasking software integra- 
tor. Priced at $99.95, it supports both 
keyboard and mouse. Contact the 
vendor at 1918 Main Street, Santa 
Monica, California 90405 (213) 392- 
9851. Reader Service Number 129. 

The New York Amateur Comput- 
er Club has published a catalog of its 
PC/Blue Library: over 560 public 
domain programs for the IBM PC and 
compatibles. The catalog is priced at 
$5 ($7 for overseas airmail) including 
postage. The diskettes are $7 post- 
paid (North America) and $10 over- 
seas air. Membership dues are $15 
per year. Contact the club at P.O. 
Box 106, Church Street Station, New 
York, New York 10008. Reader Ser- 
vice Number 133. 
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Flagstaff Engineering is now dis- 
tributing the bLisKETTE CONNEC- 
TION and the WORD CONNEC- 
TION. The DISKETTE CONNEC- 
TION is an 8-inch stand-alone drive 
system with controller that allows a 
mini or mainframe to read from or 
write to a PC unit. The WORD CON- 
NECTION is a set of software pro- 
grams that provide the ability to read 
and write text documents from most 
word processing systems using an IBM 
PC equipped with the DISKETTE 
CONNECTION. All of the WORD 
CONNECTION programs transfer 
documents to a PCDOS file using 
IBM’s Revisable Form Text standards 
for document architecture (DCA). 
For more information write Flagstaff 
Engineering, Box 1970 Flagstaff, AZ 
86002, (602) 774-5188. Reader Service 
Number 135. 

Copy-protected software is a royal 
pain in the ASCII, but with the help 
of TranSec Systems’ UNlock, you 


can banish the pain forever, accord- 
ing to the vendor. The program “re- 
moves copy protection” and provides 
standard nonprotected DOS copies, 
which enable the user conveniently to 
run the software from a hard disk or 
RAM disk. The original disk need no 
longer be present in drive A when the 
program is run. The price is $49.95. 
For further information, contact the 
vendor at 701 East Plantation Circle, 
Plantation, Florida 33324 (305) 474- 
7548. Reader Service Number 137. 

KDS Corporation has announced its 
Knowledge Delivery System, an arti- 
ficial intelligence program that pro- 
duces expert systems of up to 16,000 
production rules and 256,000 facts 
from up to 4,096 case histories. The 
fully menu-driven system communi- 
cates with the user in English. The 
cost is $495-$795, depending on op- 
tions. Contact KDS at 934 Hunter 
Road, Wilmette, Illinois 60091 (312) 
251-2621. Reader Service Number 139. 


US0 80 


FULL SCREEN SYMBOLIC DEBUGGER 


“THE SINGLE BEST DEBUGGER 





Complete upward compatibility with DDT 
Simultaneous instruction, register, stack & memory displays 
~ Software In-Circuit-Emulator provides write protected memory, 
execute only code and stack protection. 
Full Z80 support with Intel or Zilog Mnemonics 
Thirty day money back guarantee 
On-line help & 50 page user manual 


ONLY PIL De 





P.O. BOX 49473 AUSTIN, TEXAS 78765 (512) 478-4763 


oo oe 
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SERVICES 


_ Pile Transfer Service: Advent provides a service beyond the ability of any format conversion 
_ software! We can transfer files between MS-DOS/PC-DOS, CP/M and other operating sys- 
tems in300 different3 1/2”,.5 1/4” and8” formats. includes Apple and Mac, Apricot, Data 
General One, Kaypro 2000, Eagle, Epson QX-10 & PX-8 (ROM), HP-150, and North Star 


















eRe RARER REREAD RRO 


ee SOFTWARE 
. : CMAP: A stand one sce sie 





DCNAP (CP/M & MS-DOS) boo ks oh es $63.95 


eee Se Uk cea vtntiaprigran etait or) cae ee OG 
ee 
scale. 
Plotpro (CP/M & MS-DOS) Sese- eee $69.95 


Sh i dnips trcceriey bream obtains os peaenderd ain aeons 
linear and non-linear systems and circuits and their effects on user specified time domain 
waveforms. Based on a512 point Fast Fourier Transform and its inverse. Linear processing is 
1...  — 

gg eh ee $69.95 


HOME & BUSINESS 


_ Ghecks & Balances version3.6- A complete personal checking program or business regis- 
_ ter. 3.6 iscompletely rewritten and includes check writer and data base. It is easy to learn and 

2 ee page manual 

Le Checks & Balances (CP/M & oc $74.35 


_ oe Hers theutimate pre performance package fr sma 


SOFTWARE UTILITIES 


__ AutbodlifE: File difference detector. This program finds insertions, deletions, and changes bet- 
ween any two files. —— ——— and more! 
Autodiff (CP/M) ....... I $29.95 


CP/M DateStamper: intcealicaly tare pie the ath het aed, last read, or 
modified. Works without a Real Time Clock , or with many clocks currently on the market. 





Utilities are included to allow copying, erasing, or renaming files based on time and date. A 


Ene logging ubility is included to record computer usage for business/ tax purposes. 
Cera CCCs‘ sti#¥ jw... i... $49.95 


—— 
Crypt encodes files to provide security for sensitive data —— ee 


modem transfers. 
Pack and Crypt (CP/M & MS-DOS) ............. eo so oes $24.95 
‘Sidekickc One of the most popular ever written. Use Sidekick as a calculator. 


"notepad, appointment calendar, auto dialer, ASCII conversion table and much more. On-line 


a . : __ help if you forget any of Sidekick’s many functions. 
- i Oe Boao ooo oe ieee Fe $54.95 





_ Piceiecen ne nbinat 
SmartKey (CP/M & MS-DOS) 


Co SmartPrint: A powerful add-on to SmartKey, SmartPnint is a versatile writing tool designed 
eer you full access to your printer's features such @S wide, bold, condensed, underlined, 
SmartPrint (CP/M & MS005 ............ FREE WITH SMARTKEY PURCHASE 


Galera: Your Computer can read and write upto80 CP/M and MS-DOS / PC-DOS disk for- 
mats. Versions available for most popular CP/M and MS-DOS computers. Specify your host 





when i 
venom itr (AG MSOOS............. ll $69.95 
XTREE- maintenance that graphically Subdirectories and file- 
name paths. Complete control of your directory including delete, rename, view, listor show. A 
must for your IBM or compatible. 
MAUMEE (MS-DOS) -..-... neces $49.95 
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P~ Epson Corp. CP/M - DRL MS-DOS - MicroSoft, PC-DOS - IBM Corp., dBASE Il- Ashton Tate 


Basic Business (CP/M & MS-DOS) oy ee $39.95 


on of 


As a 


Super Zap: Disk patch and dump program if you have used DU, you will love this menu 


joe 66566 sse is ee 


2P7EM- Run aimost any CP/M program on your IBM or clone. Use with Media Master 
en ee ee 
















































PROGRAMMING LANGUAGES 


C780 Ver3.1- Full featured C compiler and runtime library. One of the fastest on the narke 
emcee 
C/80 Ver. 3.1 pie gps cseecceeess pee beu ees ce 


= Beer ete ee » 


Tastee Pencat: Boron’ version 30, The best Pascal compl 08 the ment 
Turbo Pascal (CP/M & MS-DOS) ..............-..-...--2+-++---2-205 


Turbo Toolbox: Set of 3 utilities for use with Turbo Pascal. So 
Tarbo Toolbox (CPN & WS OD ooo no noo ovo vv cece 5 34 


Turbo Tutor: Teaches step-by-step how to use Turbo Pascal | : 
"Temes Temtow (CP BE ao oo oo ovo inc ccs ccssecss wedses 5 


sexe EDI ees 


and brackets, improper 
Punctuation & Style (CP/M & sO ee a oo ecu ic cuee s 


The Word Pius: The utente ecling dca Nick ctlly Sits sainiaelind wae | no 
you correct spelling options, shows the word in context, allows you to build dictionaries 
Special words you use, and much more. 

i ge 


HARDWARE & — 
print. IBM and/or Apple Graphics printer emulation, plus 16 other print functions 1 
replacement chips quickly fit inside Epson FX series printers. eo 
printer warranty. 


Pimper PCM Tana oo ok vo vk ce 

Diskettes, Double Density 

Maxell box of 10 with storage box. 3M box of 10 

Single Sided ........... $19.95 Siagle Sifted ........._- 

Double Sided ........... $23.95 Doubie Sided ........... 

Economy Diskettes: pate ot eae ek ae 

i 
MI naan og on os oo ooo ow hi i 


Call or write for our FREE catalog 
Ail items are warranteed for 90 days. 30 day money back guarantee if not completely : itis- 
fied. Guarantee for software applies only if diskette seal is intact. Visa and MasterCard are 
welcome. Please add 2.00 freight per total order and 2.00 for COD orders. California residents 
please add 6% sales tax Prices, availability and specifications subject to change without 


(800) 521-7182 


Hours: oo 


CALL TODAY 








CP/M 

For some time, DDJ readers have 
been writing to express concern about 
Digital Research’s apparently wan- 
ing level of support for CP/M 80. Co- 
lonial Data Systems is now making 
available CP/M 2.2 and CP/M Plus in 
the same unconfigured packages that 
DRI supplied directly in the past. The 
prices are $75 for CP/M 2.2 and $275 
for CP/M Plus. Contact the vendor at 
80 Picket District Road, New Mil- 
ford, Connecticut 06776 (203) 355- 
3178. Reader Service Number 163. 

A hand-sized computer from Brit- 
ain with CP/M compatibility and up 
to 256K of RAM has been announced 
by AMS Numerics. The LCD screen 
can display two or four lines of 16 
characters, and the keyboard is avail- 
able with either 20 or 42 keys. Pro- 
grams and data can be downloaded to 
the unit via its built-in RS232 port at 
rates up to 9600 baud. A parallel port 
allows interfacing with other electron- 
ic units, and there is also a separate 
bar code reader port. The unit weighs 
29 ounces and operates in tempera- 
tures from 0—40°C. Power is sup- 
plied by a rechargeable, removeable 
battery pack, which can power the 
unit for up to three months at a time. 
Contact the vendor at Wallstreams 
Lane, Worsthorne Village, near Burn- 
ley in Lancashire, BB1O 3PP, En- 
gland. Reader Service Number 165. 

Spectravideo has introduced an 11- 
pound, battery rechargeable, CP/M 
2.2-based lap-sized portable computer 
with a 25-line display, a built-in 3.5- 
inch drive (360K formatted), and six 
pieces of bundled software (Word- 
Star, ReportStar, CalcStar, Mail- 
Merge, DataStar, and Scheduler 
Plus) for a list price of under $1000. 
The product is scheduled for delivery 
in September 1985. The company also 
will offer three “transportable” CP/M 
computers and two MSDOS desktop 
maehines. Contact the vendor at 3300 
Seldon Court #10, Fremont, Califor- 
nia 94539 (415) 490-4300. Reader Ser- 
vice Number 167. 

The Private Line is a software- 
based DES system that can process 
any CP/M file at the rate of 10K per 
minute with a 4 MHz cpu. It will also 
overwrite a file with binary zeros and 
purge it from the directory, as well as 
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ee 


display a file in hex format. Contact 
the vendor, Everett Enterprises, at 
P.O. Box 193, Bath, NC 27808 (919) 
923-5621. Reader Service Number 169. 


Note 

In the July “Of Interest” column we 
stated that the EL286-88 Processor 
Converter from Edsun Labs allows 
you to replace directly an 8088 micro- 
processor with an 80286. A more ac- 
curate description would be to say 


SPSS DNAS ap OILS SSIES EE II IE EBERT 


bsannats scaoenaanonees 








PRE EONS 





that the EL286-88 is a VLSI compo- 
nent that greatly simplifies the hard- 
ware design of an 80286 upgrade 
board by converting 8-bit 8088 bus 
signals to those of the 16-bit 80286 
while accomodating asynchronous 
clock rates. 


eed 

— nd 
Sa 
SOFT¥ 


; Over 
Strength in DOS, \ ‘video, string, printer, async, and systems 
interface. All DOS 1 and 2 functions are in assembler for speed. 
All video capabilities of PC supported. All printer functions. 65 
ing functions. Extensive time and date. Directory searches. Polled 


leaf Comm Library.) Function key support. Diagnostics. Raicbow 


Color Text series. Much, much more. The Greenleaf ee Simply 








SES SS 





oe already complete . 


SNS OSS aS SE SRO SS = SSS Sosa Se Sia see aS aa 















VIVA AM 


. Check’o 


SES 


“THE GREENLEAF FUNCT IONS” 


= _The Library of Ci Functions that f probably | has 5 Just | what yOu | need . .. TODAY! 


ary (and the most extensive). All ready 


already has demo programs and source code 
s already compatible with all popular compilers 
____= already supports all memory models, DOS 1.1, 2.0, 2.1 
" @ already optimized (parts in assembler) for speed and density __ 
= already in use by thousands of customers worldwide 

» already available from stock your dealer Probably has it) 





. ‘already has what you Te working to re-invent 
« already has over 200 functions for the IBM PC, XT, AT, and compatibles 
. already tested . 


.on the shelf 


SER SSSR NSE 


Saint cosaition when ordain. Add $7. 00 for UPS second- 
oa air (or $5.00 for pone a cle add sales tax. 


| = General Libraries $185 For Information: 214-446-8641 

= Comm Library $185 GREENLEAF 
““sCrcs6é Compiler”$349———————— yosusbmesteneeernneuenereetaeeutntaoncasensoetcentessseetaerestbenecs = ee) ale cy RE ; 

= Lattice C $395 Prices are subject to 2101 HICKORY DR. 
L =» Mark Williams $475 Grange WENOUt NOUGE agar e TON: 3X 75006 
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The Best Source 
Debugger for C 





Interactive testing: enter any C 
expression, statement, or function call, 
and it is immediately executed and the 
result displayed. Direct execution 
allows fast and thorough testing, 
makes learning C a snap. 

Run-time checking: execution stops 
upon exception, and source code dis- 
played. Exceptions include array refer- 
ence bounds, stack overflow arithmetic 
or floating point error, etc. Pointers are 


checked for null or out of range values. 


Breakpoints: any number of break- 
points can be set anywhere in your 
program; breakpoints are set with screen 
editor, not by line numbers. Breakpoints 
may be conditional. Single-step by 
statement. Interrupt execution from 
keyboard. Breakpoint, exception, or 
interruption is always shown with source 
code. Examine and modify data, look 
at stack history. Even change your pro- 
gram and then resume execution! 
Lint-like Compile-time checking: 
argument number and sizes are checked 
for consistency. Never mismatch source 
and object code. 


The best feature of all: the fastest C 
interpreter is right there when you’re 
debugging. Make changes in seconds 
with the integrated screen editor. Test 
the changes immediately, running your 
program at compiled speed. Save source 
code for your favorite compiler, or make 
stand-alone executable p 
ing else is needed. Instant-C is the 
fastest way to get working, fully 
debugged C programs available 
today. 


‘“We sincerely feel that Instant-C can have a 


major positive impact on programmer produc- 


tivity.” Computer Language, Feb. 85, pp. 82-83. 





Instant-C is only $495. Money back 
for any reason in first 31 days. 


Rational 


Systems, Inc. 


(617) 653-6194 
P.O. Box 480 
Natick, MA 07160 
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NEVER AGAIN WRITE SOURCE CODE FOR SCREEN DISPLAYS! - 
If you LIKE Turbo Pascal*, you’II LOVE TURBO SCREEN™! | 
Tired of writing line after line of source code just to create effective screen displays and error-proof data handling? 


Then use TURBO SCREEN ’s Editor to create the screens, the Collator to define a list of screens... 
and then relax for a few seconds while the Generator writes the code! 


TURBO SCREEN™ 


e 100 Fields per screen, and up to 80 screens in your application. 
e One screen or eighty, the size of your program doesn’t change. 
\/O field types of: 
Real, Integer, String, Character, Boolean. 
© “Bullet-proof’ data entry. | 
° Create Window-Style overlays or Full-screen pictures in 
CP/M*, MS-DOS*, or PC-DOS. 


® Supports video attributes for your terminal. And YES, if you 
have an RGB monitor, you can create screens in COLOR on 
your IBM PC or true compatible. 


e A SINGLE LINE of source code invoking TURBO SCREEN’S 
“display” procedure controls: 
—picture selection 
—output to screen, printer, or disk 
—1/O field update 


COMPUTING 


23611 Chagrin Blvd., Suite 101 


Cleveland, Ohio 44122 Computer System: 


Check TURBOSCREEN™ Operating System: 
package $49.95 

Money Order Plus Ship. . 

o (UPS) 5.00 Computer Model: 
es Total $54.95 Name: 

Master Card Address: 

Card # City: 

Exp. Date: Telephone: 
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Ohio residents add 61/2 % sales tax. Outside U.S.A. add $20.00 


e TURBO SCREEN'/M is completely menu-driven and includes a 
built-in Screen Editor, Collator, and Generator, each called 
up with a single keystroke! 
® ADVANCED EDITOR: 
—Turbo Pascal*—like commands include: 
— Block commands for copy, fill, exchange, erase. 
—Draw lines in any direction with any character. 
—Supports IBM color monitor and graphics characters. 
® FAST—Generates code for 20 screens in about 60 seconds! 


® DISK UTILITIES built-in: 
—directories 
—erase files 
® REQUIRES: 
—Turbo Pascal any version 
—80x24 or larger video screen 
e AVOID software “bottienecks!”’ 


SCREEN™ write your I/O source code today! 
ay 


ONLY — Call TOLL-FREE: 1-800-243-1849 





Inside Ohio call 1-216-292-8745 (Lines Open 24 hours, 7 days) 


8-bit 16-bit 
CP/M80_  ~=—=—Ssdw PC-DOS 
CP/M86 MS-DOS 
Disk Format: 
State Zip 


U.S. Dealer Inquiries Welcome. 


*Turbo Pascal is a trademark of Borland International. IBM is a trademark of International Business Machines. MS-DOS is a trademark of Microsoft. CP/M is a trademark of Digital Research. 
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PC WEEK’S PRODUCT OF THE YEAR 


PC MAGAZINE'S AWARD FOR TECHNICAL EXCELLENCE 








Borland Introduces 


the Laws of TURBO DYNAMICS 



























Laws That Work Like Magic. Whether ee PT A ei Turbo Dynamics Applies to Turho Pascal. 
technological excellence, or innovation in a ep ry We ? Borland s Pascal family of products is growing 
areas such as pricing, = < =X __ by leaps and bounds. 
not copy-protection, Loe SPEED, POWER e R D VV You can now join 
licensing agreements, ee 3 ue _ hundreds of thou- 
te |i 60 d -_ Borland products are known 2 60 DAY MONEY-BACK ds of 
site licenses, 60 day ia he ast powerful anid to GUARANTEE. | sands of users 
money-back guarantee ~ deliver an incredible price per- This third law is actually a : and enter the 
—Borland is clearly | formance ratio. We only believe. FF first in the industry! We are so world of Turbo 
ved h = superb software sure that you will love our - Pasa: 
recognized as the rock bottom prices. software that all of our pro- ascal program 
software industry ducts now come backed with ming. And 
leader. The following — ee a oe remember, all 
three laws of ‘* Zurbo * ee three laws of 
Dynamics’™ exemplify "einen Turbo Dynamics 


our pledge for excellence. 


TURBO PASCAL” $69.95 


The industry standard. With more than 350,000 
users worldwide Turbo Pascal is the indus- 
trys de facto standard. Turbo Pascal is 
praised by more engineers, hobbyists, 
students and professional programmers 
than any other development environment 
in the history of microcomputing. And yet, 
Turbo Pascal is simple and fun to use. Free 
spreadsheet included on every Turbo disk with ready-to- 
compile source code. Options: We offer the exciting Binary 
Coded Decimal (BCD) option for your business applications as 
well as an 8087 option for your number-crunching applica- 
tions at a very low charge. Please refer to the coupon. 
Portability. Turbo Pascal is available today for most computers 
running PC-DOS, MS-DOS, CP/M-80 or CP/M-86. Jeff 
_ Duntemann, PC Magazine: ‘In its simplicity it achieves an 

elegance that no other language ies has ever Je c 





oe DATABASE TOOLBOX” ' $54.95 


The Turbo Database Toolbox is the perfect 
complement to Turbo Pascal. \t contains a 
complete library of Pascal procedures that 


allows you to sort and search your data _ 


_} and build powerful applications. It’s 
) ripple Borland set cd oe that will give 
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TURBO GRAPHIX TOOLBOX’ $54.95 


High resolution monochrome graphics for 
the IBM PC. 
The Turbo Graphix Toolbox will give even 
— a beginning programmer the expert's 
| edge. It's a complete library of Pascal 
procedures and functions. Tools that will 
allow you to draw and hatch pie charts, 
bar charts, circles, rectangles and a full 
range of geometric shapes. Procedures that will save and 
restore graphic images to and from disk. And much, much, 
more. You may incorporate part or all of these tools in your 
programs and yet we won't charge you any royalties. Best of 
all, these functions and procedures come complete with 
commented source code on disk ready to compile. 
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“apis to all Borland products. 


TURBO TUTOR” $34.95 


From start to finish in 300 pages. Turbo 
Tutor is for everyone from novice to expert. 
Even if you’ve never programmed before 
Turbo Tutor will get you started right away. 
A must. You'll find the source code for all 
the examples in the book on the accompany- 


might be the only reference on Pascal and 
programming you'll ever need. 
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